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MICROPANORAMA 


fHUCOS, ^Fstimizar el INPUT iFuere de Rango? Un ejemplo de gra- 


PROGRAMAS MICROHOBBY. T '""* la,or El B ““ 


WL/EVO The H Off Of Show 


INICIACION L ° S num ® roa en,eroa en ^ Spectrum 


BA Gif' Peniericos y Variables del sistema. doe lemas con los qua lina- 
DW U Hie este curso de Basic. 

■ 

INTEUGENCIA ARTIFICIAL STS?. 

Pa*os. 

■ PROGRAMAS DE LECTORES. sos 

■ CONSULTORIO. 


OCASION. 


i 

i 
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PREMIADOS HOBBYSUERTE 


ESTA SEMANA 


MARCOS MONTt S GARCIA. 
Mascoletar. 34, 6/'C IMA 
DRIP). 

Susenpodn o Mrcrahobby 5 e- 
mprtaf pQt wn orio M ' Car.' 

RAfAEL MASEDO RODRI¬ 
GUEZ, Poelo Esieban de Vi¬ 
llegas, 14 , 6 , fl A, IMADRlD). 
Ciflto d^ p/og«mas (5 •’ Col.f 

JOSE VAIERO DIAZ Gigon- 
t*i y Cabezudoj, 56 , 2 .° iiq 
IMADRlD I 

JoysfrcJf con su mFerfece U.** 

CorJ 

AiBERTO ROMERO tOPEZ 
Graf. Prime de Rivero. 14. Ler- 
mo IBURGOSI. 

Cnfo de pfogratnoi 15 3 Coil 

EMIIO AUEN PElKINS. P-co 
d* iosArlilleros. 56 , 5 . l A. I MA¬ 
DRID I 

Cmfc dt piogramot 15 ' J Cot ) 

JOSE IQ1ESIAS ABAS. Vivien- 
das Baecas.A.3,' D.f*Mgl tLA 
CORUSjai 

SvscfjpGdn o Mjcrohobby Se- 


mcrnal poi un «nr> 14 ’ Call 

MARC MOON LI AN ESCO- 
LA, Traveicra d* las Cons, 
106 , 2 , 10 . 2 , (BARCEIONAI 
Ohio de piogramot f 5 a Cot! 

RICARDO ALVAREZ GUEVA 
RA. Sebiflolo, 2. Doi Hermo- 
fias ISEVILLAI, 

Cmio de ptogtomoi 15 1 Cot J 

ALBERTO BAGANIA Amoio. 
31. I 4 IBARQELONAI. 
Svscfrpcrdn o Mciflliobbjr Se- 
mono! pot un arto !4 1 ColJ 

i. ANTONIO GARCIA CANE- 
DO . J Oi6 Anron ip. 5. Ca rbollo 
iLA CORUNAJ 

Cmo de programoi 15 " Coil 

JOSE CARLOS MARTINEZ 
GUTIERREZ Etfresno Viejo, 
22.1 MADRID!. 

C'nlO de progrpmOi 15 1 CaU 

MANUEL CARLOS LOBO 
COELLO. Largo, 48. Parados 
ISEVILLAI, 

JoyiliC* con in interface 13 1 

CafJ 


FERNANDO NAVARRO GAR 
C*A hfonio Mercedes 30 , 
I plo 1 IMADRIDI- 
Gek) de pragramos 15 ' Cali 

ECO, PEDRO RODRIGUEZ. 
Colombia. Prolong. 13 , Dob- 
f<r. ICARTAGENAI 
Sirscripcida a MrcrobobJiy Se 
mortal par un ana 14 Call 
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INFORMATICA AL AIRE LIBRE 


Hn osias ftchas en las nuc cl cator 
aprieta, nada nicjor ni reTre*- 
canic que irse a la playa y, de paso 
que tonmmos comacio con ta natu- 
raleza, aprovcchamos para entrar cn 
comacto coo cl mundu del ordcnsi- 
dnr. 

Computer Camp, umi orgmniza- 
cion espcciallzada en aciividades cx- 
irjcscohircs durante el curso y las 
vacadones. quiere colaborar eslrc- 
chamenic con las families en hi labor 
doccntc. For cso. ha organi/ado un 
Canipamcmo Informal ico al Aire 
Lihrc para ftmilias. cn 3a Flay a del 
Palmar (Cadiz), en lumosqumccoa- 
les durante los lueses dc jtilio y 
ago* to. 

til precio de urm iqumccna es de 
2 2. f-H K) pts. eon pension com pie la. 
cscursiones y Curso de In formal tea 
para elm vales, y eada lurno dispone 
dc 50 plazas, 

til tele lb no esel -1504W coo el pro- 
fijo, para los dc I’ucra de C adi/. 956. 



CENTRONICS QL 

Un n-wro iniurbco CENTRONICS poro p| OL ka iido dmarroiodo 
per la iiar-A .1 M H 1 Fr^n^ra* vu d^bteCti^ * ^rwciyl-*aciOn ph h 
pafrts, tfj IlfTVfll <1 par li hfmn iSfi. »rn irgadq ?qmbi*n kl dnifi 
bw^nde la"- p*-rif*riw dOwrrcHPddoi per \a cptn iMDISCOMf. poto 
lot Gtdenadotvi SfNClAiR. 

CofTtp corQ<^3Hco impofluntp dfr psr«F#ri«j .M%r sMnlar 

— Conv.fff® soFidp cri p^roldo la ujlida en 54 ?rie del Ql. fcctfmf 
Fipndo dp eira ^cwm a lauViliKpriAn decuol^iMpi' i^piPMS^uCENTtONlC 

- tiA6 IpbrkPdcj c&n CMOS. fo que parrottc su- FuncKJi« 

miepfy £oft let arwfgia iMww dd order^doc, un pecewdod de U*- la r 
una i^nte e-s!<mgr de piimpnfacrdp. 

— fi cnrnpntibl* con todo <1 vi^Jvrtirc d-j ; CH, ya qm? a w deu^TO' 

llo n& QCUJM n-ngur>j posiddn do f npfftO*id, 

- Potep un wltesncp ouldflCHW dp ro^ubc?6fi r qtw Nscp ^an<io- 

norfMenio opl inMrl(K4 leo co^plprorr^f-re IndtiprttcJieriiB He! tmiela 
d# imprMra uMjeada 

— Se co-neefa □! Qi difecrajnenFe pof Id taMda SHEfi I h 

- f ora ] -Wut la .mpwbJta butfd ton rpclpflf O^'EN Tt 2.SERI p- de- 

btdo d cjwP Corpora la Cdrfrtp^ridp'K ip dfl bin Cdm IpE Hal pe^miPp 

Fd npfoduccii6n de fod* upo de gr^lko^ y carnctrrei- 
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EL AGENTE 007 


James Bond, uno de los persona- 
jes mas populares del cine, ha entra- 
do a for mar parte tambidn del mundo 
de los videojuegos con on programs 
de reciente aparrciOn en el Reino Uni- 
do. Se trata de 007 y es un juego muy 
complejo en el que nosotros nos 
converttmos. por aigunos momentos, 
en el famosos personaje. 

Mezcla de Arcade y aventura es un 
programs bastante bien reahzado 
que ha aprovechado un tema y un 




personaje de exito para orear 
un juego emocionante y de in- 
triga. apto para todo tipo de 
usuarios. 

Ha sido realizado por Domark. 
la autora de «Eureka» y Neva el 
nombre de «A View to a Kill* la 
ultima pelfcuia de James 8ond f 
con musfca del grupo Duran 
Duran, 











UBROS 


JET SET WILLY II 



SofrwgH? Projects ha lonzodo a I mercodo la segundo parte 
do su archipopular juego Jei Set Willy. Fjie pretends a;r ena 
continuQcidn del onierior, ounqye despu£s de verb nos 
permiiimos dudarb muy mucho, 

Jet Set Willy il us completamenTe id^ntico al de la prim era 

porte, pero no $6b en lo 
que se reliere al 
personaje central o la 
estrudura del juego, 
si no que incluso tiene 
las rnismas portfolios 
que el ofra, 

lo unico que ha 
variado es la historic, el 
objeiivo y las 40 
portfolios que se hon 
anadido al programo, 
aunque tampoco esios 
se han cambiado 
mucho. 

A los que les gustd la 
primera porte, si quieten 
seguir jugando aquf 
tienen la continuocidn, 
pero que nadie espere 
encontrar noda nuevo. 





* PtEASUREG AME 


FRANKIE 
TO 


ware. 

Corn<? muesfrg, Q«Qn Ion¬ 
ia Frankie Goes to Holly¬ 
wood, basodo en el OOODCkb dbum del y r upo =Tbe Pleasure 
Dome*, 

El programo l&ene mucho que ver con lo filosofio que 
prodicon los Frankie y condambiente de las cdles de bssu¬ 
burbia* de Liverpool, desde dbnde vomos a inidar unq bus- 
queda bocio b cupub del placer. 

En una mezcb de arcade y aventura, nos veremgs en- 
vueJtos en bs sbuaoones mas comprome^das, lodes llenos 
de una fantasia desbordante. 

El programa e$t 6 distribuido en Esporb por ERBE Soft¬ 
ware. 


Ocean, segun parece, pre¬ 
tends converlifse de b noche 
a b ilronana en una de las em- 
presas mas importontes def 
mundo en |uegas para arde- 
nador. Y d poio que Bevo no 
m Zi Inrdor mucho 60 CQnS6- 
oriudidad 
es ia empresa mas presTigagig 

dd Rtync Unkfa con Uttimate. 
Ha reobado dgunos proyec- 
los | unto a atro cobso de bs 
wideojuegos coma es US Gold, 
ha odqLundo d sdb Imagine 
con el que ha logrodo un 
ocuerdo de cobbofotion con 
Konami, y ahora ha deddida 
invodif el mercado dd soft- 
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DICCIONARIO DE 
AVCROINFORMA TIC A 

Editorial Noray R Tapias. T 7 Q p£gs 


Kstiimo^ uni« un dbdemario que prelcnde sup Hr 
de :il|Eun mu do lit to It a. de bifrliogfalla suficienlc en 
el mundu de tns ufdcnadores que nos ohliga, en 
miss <le una !k:ish3ei p a cun*ultar obras inglcsus. Por 
ese motive se ha crcado este diccionario con el (In 
de ayudamosaconocere$os 1 no i nos in format! cos 
que no estin nada c taros para mucho^i usuahos. 

La obra eomienza eon un v oca ho lark) inyles/es* 
panoL que incluye una lista de lerminos mas cumu¬ 
li es de los ytitizados por eualquier usuark) de orde- 
nador. 

Ht resin del libroes un drccionario muy complelo 
con b rna>or partedc bspjljbnsques<uLilizan cn 
informalica peroudema^. ineorpum (amhien lenm- 
nos guc solo conocen (os profeikmales y que aho- 
ra h gracias a estc libm, estarin tambien al tkanze de 
los profanos, eomo puedan ser por cjcmplo Bac¬ 
kup* Gap, E-lJ/lt*Dump y un mm fin de paJabras 
mss, 

f : I iibru. tunui hien se explka al principb, no pre- 
tcrnle ser de tc\ui que venga a ensenamosb lodo, 
sino una obra de consults en (3 que nosolros en- 
con ire m os la ayuda nccesaria para salii de una si- 
tuaribn comprumetida. Aqui cneomraicmua una 
urienEaddn para saber por demde andamos*de la] 
modo que una vez que huyamus utihzad-oeon tier- 
ia frecuencia esic diceioratio, seimos capaccs al 
e neon I ramus con un texloen ingles, dc ^aberinicr- 
prelar lo que alii dice, 

Es una obfa que podra scr utihzada tanlci por los 
prufcsionalesdc la infonnaiicacoivioporlo&aun no 
inieiudusdcmusiLido en d lema. Part eslos ulMmos, 
es mis que recomenduble. por que les pcrmile dis- 
ponerde un librode consuM^que van a uliii/arbas 
Lame a menudo. 
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JP 8940: imprime el punto 
de acuerdo con ios atribu- 
tos permanentes 
Como de costumbre. para 


aquellos que solo quieran 
verlo tuncionar, os damos 
un pequeno programa car- 
gador en Basic. 


10 REM **CRRGR DE LR RUTINR *# 
15 BORDER 0 CL5 
20 FOR t =23296 TO 2330? READ 
a POKE i,a NEXT i 

30 DATR 237 ,75 > 125,92,62, 191,2 
05.172,34,195 ,236, 34 

4© REM ** CURUR DE PRUEBR * * 

50 FOR X ~2> TO 25S LET y=95+95 
*SIN (£*Pl*X/255) 

60 POKE 23677 ,x POKE 23678 , y 
RRNDOMIZE USR 23296 
70 NEXT X 


UN EJEMPLO DE GRAHCOS 


10 LET NUM=UfiL '2‘. LET LONG=U 
RL "9" : LET UNOsSGN PI 
20 DIM N$(NUM.LONG J 
30 FOR I=UNO TO NUM 
40 RERD Mid) 

50 NEXT I 

60 FOR IeUNO TO NUM 

70 INPUT ‘ N0H8RE DE "; ( N % 11 ) ) ; R 

% 

80 NEXT I 

90 DRTR "L PRDRE t " UR MftDRE “ 


casos de mayor eompleji- 
dad 

Es necesario que la varia¬ 
ble. en esie caso la matriz 
N$. vaya encerrada entre 
parentesis, de lo contrario, 
el ordenador interpretaria 
que queremos inicializar 
dos variables en lugar de 
una 


OPT IMIIAR 
EL INPUT 

En principio. como mues- 
tra el programa de demos- 
IraciOn, este truco de Angel 
Matilla esia enfocado nacia 
programas de utilidades. 
como por ejemplo, rellenar 
con datos una licha o tmpre- 
so, aunque seguro que 
vueslra imaginaciOn le en- 
contrary muchos mas usos 

Se trata de aprovechar la 
circunstancia deque la sen¬ 
tence INPUT admite ade- 
mas de la variable o varia¬ 
bles que necesitamos Ini- 
cial^ar. un texto explicative 
empleado para dar mayor 
claridad a la pregunta No 
hay ninguna razen que im- 
pida colocar parie de este 
texto, si nos interesa, en una 
variable o matriz, de lorma 
que podemos generalizar la 
rutina lo mas posible 
pa so ahorrar un pwi, 
memoria, esto ultimo sera 
especialmente palenle si 
necesitamos iniroducir mu¬ 
chos datos. 

Nemos escogido un ejem- 
plo muy elemental, pero que 
creemos denota claramente 
el procedi miento a seguiren 


iFUERA DE RANGO? 


Aqui tenemos un intere- 
sante truco de Juan Carlos 
Villegas que nos permitira 
-plotear* en un range de 
puntos de 192 x 256, es de- 
cir, en toda la pantalla. en 
lugar del rartgo standard de 
176 x 192. 

La rutina en mdquina es 
muy sencilla, y hace lo st- 
guiente: 


LD BC. 1236771; carga en 
B la coord, y, en C la x. 

LD A, 191; valor maximo 
de la coord, y 
CALL 8876: rutina ROM 
que comprueba que y no se 
exceda de 191 Si el valor es 
cor recto, deja la direccion 
de panlalla donde debe im- 
pnmirse el puntoenel regis- 
Iro dobre ML 


Si queremos cambiar los 
atributos de las dos Eineas 
reservadas por el sislema 
operative para comandos y 
mensajes de error, solo te¬ 
nemos que hacer POKE 
23624,x en donde x es un 
numero que represent* el 
byte de atributos construido 
de la forma habitual, como 
explicamos en el curso Ba¬ 
ste de nueslra revista (color 
de tinta + color de papel 
multiplicado por ocho). 

Angel Estaban Delgado 


tambidn nos manda un pro¬ 
grama que titula Un ejem- 
pio de gr£ficos> y que por su 
brevedad y belleza merece 
la pena teclear; aqui esta: 
FOR A=0 TO 255: PLOT 
2,3:DRAW A,88+SO*CO 
S(A/128*PI) NEXT A 

En catc espaoiQ umbi^n tten&n ca- 
b«da los Irucos qu-*i ngij^roi l ecto- 
res guieran propone r _ 

p.inh e?IIq. nr] Kaernm masqufl tirwtar- 
los por corr go a MtCft OHOflBY, 
C t Lb Granja, 3 PoligonO inrfu aMil 
do Alcobcodis IMnidm)) 
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PROGRAM AS MICROHOBBY 


TRANSLATOR 

Cesar BIANCO 



Speitrum 48 K 


Este program a te puede ser muy util si lo que necesitos 
«$ un traductor en fu tarea de aprender un idiomo. 


Con & podris realizar la traduccion 
en am bos sentidos de dos sdiomas ele- 
gidos. Tamo las palabras de un idio¬ 
ma y m traduccion at otro, debe- 
ran ser introducklos por vosotros. 


eargando dcspufis cl programs con 
LOAD *. 

Paco mis podemos decir de cU tan 
solo animaros para que comprobeis su 
uiiSidad. 


1 CLS DEF PH MINJ.PKK N+2S 
61 PECK S N * 1S POKE 23650,9 POKE 
23562.1 POKE 23609,3 E 236 

75,96 POKE 23676,255 REM «UT0ft 

cesap. ioas ltd. 

a BORDER 0 PHPCft 


K 7 

15 > 

15 i 
29> 
503 


1 CLS 


IN 


DIN Cfi100. 151 
DIM ymU0 ( 15 H 
DIh Ut■100,29' 
DIM N+ I 100,291 


DIM II 
DIN XfilOD, 
DIM P1U&0. 
DIM Mf t 100 , 


0 LET D*«“ 


let a-a let g*b 


9 LET P-0 
let Mi@ 

ID CLS PRINT AT 0,10 . ‘DICCXO 
MflftiO ’.fiT 2,1/ ESPAncl-JNGLE6 I 
N GL E S - E S F AnOL ~ 

15 PRIMT AT 20,1. PAPER 5- PRO 
GRAHADO POP CESAR 1985 LTD„ " , AT 
16,2; FftPEP 4, INK 0i," fiUTOft C 
ESAft BLANCO L0PE2 H ; PAPER 6, IN 
K O' AT 16,6," TRANSLATOR COMPUTE 

30 PRINT AT jMTRODOCtfi 

DRT06 Ll ;AT OPLAE OAT0S>" 

,RT 8,1 , " £ 1 GrABRP DATOS/" r AT 6. 
17,-3 3 CAP&AR DATOS J1 ,HT 1* . 5 , "6i 
o^-oeNflft 0flTO5-\AT l0,i L "*S Ausc 
A« DfiTOS“.flT 12 , Ij," (mOOIFICRR PP 
TDJ - 


, ym wv i *- H- ' (MODtFJCRH ^ 
3SJ M ,RT 10 P 16; vil BORRAR DIMS' 
30 iwPyT r AT l.O^ ' OPCIOH ? ",T 


COPE T 

J TO 30 


35 IE 
THEN GO 

36 IF URL Tf-5 
40 00 TO 100B» 


•c4Q OR CODE Tf>5* 


5 THEN RUN 
tuAL 


. T|S 

1010 ELS PRINT AT 1S , " IMTRQDU 
CC TON DE PRTOS” GO SUB 0000 
1020 INPUT --QPCION ? ",T§ 

1001 IF Ti.-fl" THEN 00 TO 1100 
_ _ T|njE ^ QQ T0 13W0 
THEN GO TO 1500 
THEN GO TO 1700 
THEN GO TO 10 
<53 QR COPE T*>&9 


1032 IF Ti 
1003 IF T*P"C 
1034 IF T f »"D" 
1005 IF Tim "E" 
1040 IF CODE 


„ _ Tf<4 

THEN GO TO 1020 
1110 CLS INPUT "CUANTOS UEftBOS 
RE&ULRRES INTRODUZCO T " 

-H* 

1115 IF COPE H|^45 OR CORE Hfi57 
Then GO TO 1110 * 

1115 LET H«UflL H| IF H-0 OR H-I 
THEN GO TO 1010 

1117 INPUT “R PARTIR DE DUE DATC 
? ";K| 

1115 IF CODE Kf*46 OR CODE Kf>S7 
THEN GO TO 1117 
1119 LET K»UAL KJ 

1125 LET Ral LET Of ■ MNTRODUC IR 
DATOS LET Sf-UEft&OB REGULARS 
S" GO SUE 9000 

1135 PRINT FLASH 1,AT 17.®* H P0HL 

05 EN INF IN ITTOO FLASH 0 

1140 FOR X*rK TO K+K-rl 

1145 PRINT HIT 6,1,"DPTG NUNERO " 

.X GO SUE 9090 

1160 INPUT "UERBD 7 .CIIJU 

1155 PRINT RT la.I.CfCX* 

1150 NEXT X 

1275 PRINT FLASH I. INOERSE O.RT 
17,9."P0NL0S EN INGLC5 
1277 PRINT RT 8,13; M FOR 

X«K TO H+K-l: pftlNT RT 9,1; DflTC 
NUHERO ".X: GO SUB 9996 PRINT 
RT 9.1;"EN CR5TELLRN0 C5 ' , RT 1 
0 i I L C#W 

1270 PRINT RT 12,1,"COMO E5 EL U 
EROO EN INGLES 7 ' RT 13,1; 11 

1200 input "uergo 7 

1290 PRINT RT 13,1, I * LX 3 PAUSE 
50 

1201 NEXT X 
1295 GO TO 10 

1390 CLS INPUT CURNT05 OERBOS 
IRREGULflPES INTROD U Z C 0 7 ” 

1315 IF CODE HU 40 OR CODE H* >5? 


THEN GO TO 1300 

1310 LET M-UflL H* IF H«0 OR Mai 
THEN GO TO 1010 

1017 INPUT "A PRRTIR DE OUE OBTO 

’ H ;Kf 

1310 If CODE K 6 c 4 5 OR CODE K*>57 
THEN GO TO 1017 

1319 LET K-UAL Kl 

1325 LET 0-1 LET Of- InTRODuCJR 
PAIT05" LET S 1 ■ " UEP0-Q5 iRRlSULR 
RES" GO 5U0 0000 

1330 PRINT AT 17,9, FLR0H l;' fc PON 
LOS EN INF INITIUO " 

1340 FOR X«K TO HtK-1 

1345 PRINT AT 0,1,"DATO NUHERO " 

,X GO 5U5 9998 

1350 INPUT ■ U0ABO 7 "U i £ XI PR I 
NT RT 13,1,Ut(XI 
1350 NEXT X 

1476 PRINT FLASH i,AT I7,9, H P0NL 
OS EN INGLES 

1477 PRINT AT 0,13," FOR 

X-K TO H*K-1 PRINT RT fl.l/DBTO 

NUMEPO ",X GO 5LTD 999S PRINT 
RT 9,l; -CN CnSTELLAND E5 " j AT 1 

0,1, Uf CXI 

1470 Print at 12 ,!; coho es cl y 
ERBO EN INGLES 7 M ;AT 13,1;“ 

1400 INPUT "UERBO ** ",X*<X1 PR 3 
NT AT ta.liXUX) PR USE 50 
1491 NE*f X GO TO 10 
1510 CLS INPUT CUANTR3 PALR5P 
AS INTROOUZCO + ";nt 

1515 IF CODE Hf<4B OR CODE H|*57 
THEN GO TO 1510 

1516 LET H.UAL Nf IF H.0 OR H*1 

then go to 1010 

1517 INPUT - R PRRTIR DE OuE DflTOi 

ISIS' CO&E Kf €45 Oft CODE K*t57 
THEN GO TO 1517 
4519 LET K»URL K| 

1525 LET CM LET 01 - SNTftODuC I ft 
CATOS" LET Sf ■"'UOCR 0 ULAR 10 " G 
0 SUS 9000 

1.535 PRINT FLASH 1, AT 17,9; ~PONL 

OS En singular (r ; flash s 

1540 FOR JkR to H+K-l 

1545 PRINT RT 0.1,"DftTO NUMEPO ' 

. J GO SUB 9998 
1550 INPUT "PALR6HA 7 
1555 PRINT AT 13,l.U»idf 
1560 NEXT U 

1576 PRINT FLASH 1,AT 17>9;"P0NL 
OS EN INGLES 

1677 PRINT AT 0,10;“ M FOR 

JiK TO H *K-1 PRINt AT 0.1J "D«TO 
NUHERO “; oJ: CO SUB 9990 PRINT 
AT 9,1, EN CASTELLANO ES “ i AT 


10,1,U* 

1670 PAINT RT 


12,1;"COHO E& LA p 
RLABRfi EN INGLES ^",AT 13,1,' 
1660 INPUT " PAL AftRA 7 a, ,Pf'*UJ 
1690 PRINT RT 13,1, PfWl PAUSE 

1591 NEXT J GO TO 10 

1710 CLS INPUT "CUANTAS EXPBES 

EONES IPiJTRODUZCO 7",M* 

1715 IF CODE M0 (45 Oft CODE H*>67 
THEN (SO TD 1710 

1716 LET H-UftL H* IF H-0 OR M«1 
THEN GO TO l*ia 

1717 INPUT "A PARTIR DC OUE DRTO 

7 " ; K J 

1715 IF CODE Kf{40 OR CODE K*>57 
THEN GO TO 1717 
1719 LET K-UAL Kf 
1725 LET Hal LET 0*» H 
DATOS" LET Sf-"EXPRC 
0 SUB 900B 
1740 FOR X-K TO H+K-l 
1745 PRINT RT 6„1,"DRTO NUHERO " 
x GO SUE 999S 

1750 INPUT "'EXPRES ION 7 » i Nf LSO 
1755 PRINT RT 13,l,N«tX) 

1760 NEXT X 

1076 PRXNT FLASH l,flT 17,9,"POHL 
OS EN INGLES 

1B77 PRINT AT i,13 # < FOR 


INTftODUCIP 
^RfSrONES" G 



PA 


USE 


X^K TO H+K‘l PRINT RT 6 , 1 . DRTO 
NUMEPO ";X■ GO SUB 9996 PRINT 
RT 9,1; 'EN CflSTFLLRNO ES , RT 1 

0.1 ( Nf {Xj 

10-70 PRINT AT 12.1; "COMO ES E« I 
NGLES ? ■ , RT 13.1; 

1600 INPUT "CXPRESION 7 1 
1A9& PAINT AT 10 T l,HflX) 

5 0 

1091 NEXT X GO TO 1® 

2000 CLS PAINT AT 1,10, "CPABAP 
DATOS rr GO SUB 0®0® 

2010 INPUT "OPCION 7 j T * 

2011 IF Tf, 'R- THEN GO TO 2®2® 

2012 IF Tf« ,J 0" THEN GO TO M3® 

2013 IF Tf. X" THEN 00 TO 204® 

2014 IF T t ■" D " THEN GO TO 2®5& 

2015 IF T|s"E" THEN 00 TO 10 

2015 IF CODE Tf,<65 OR CODE T**®9 

THEN GO TO 201® 

2®20 CLS LET 0*#"GRABPR DATOS" 
LET 51■"OCRBQS PEGUL ARE 5 1 GO 
SUB 900® GO SUB 9996 OUEA 1 P 
LOT 1.05 ORAU 263*® OUCP ® LE 
T X-ft GO 3U0 2110 SAUE "UEft.RE 
+ ES + " DATA C»U GO Su5 2145 SA 
UC "UEft , RC . IN , DftTR If it GO TO 
2148 

203® CLS LET Qfv'XftABRP DATOS" 


8 MICROHOBBY 




















LET SA-'UCABOS IRREGULAR-" GO 
SUB 9CH50 CO sue 3996 OUER 1 
PLOT 1,85 DRAW 233,0 OUEP 0 L 

et x * e go sue 2110 sauc “UER.i 

P*ES. - ORTA U*l> GO SUB 2143 S 
AuE "UER , IS. IN. - DATE vfii GO T 
0 2146 

20+0 CLS LET Oi-GRABAR DATOB" 
let 3*."UOCRBULARlO P GO SUB 0 


300 GO SUB 99QS OUEP l PLOT 1 
B *S DflflU 263,0 OUCP O. LET X-t 
GO SUE 2110 SflUE -UOCflS.BSP." 
DATA UfH GO SUB 2143 SRUE "U 
QCT.B.lNG. DATA Pill GO TO 214ft 
20SO CL3 LET Oft QRHBflR DATOS" 
LET 3f-"EKPPESIONES” GO SUB 9 
BOO GO SUE 9^P DUfA 1 PLOT 1 
,ES DRRU 253 0 UUCP 0 LET X.H 


go sue sue sftue _ 

D-BTfi Nf(> GO SUB 214? 
^6. - DATA n 1 c * r 
- Tg 




5RUB "E 

XPRE . INC . ■’ DATA rtf IJ GO TO 21*6 

2110 IF KpI THEN So TO 2120 

2111 IF Kifl THEN GO TO 2112 

2112 PRINT FLASH I, HT 16,9, ’"BINE 

NS ION UAC1A ,AT 17 

□SIBLE ORRBRH FQ* 

2S. BEEP .10,0 NEXT X 
GO TO 2000 

2 120 PRINT RT 0^1; "UOV A GPABAR 
* 4- * IMPl/T -'CSTp SEQyHQ 7 ”,I* 


1 « ¥, L _ 

17,4;"IKP 
3« Kil TO 

FLASH 0 


S- "H” T 

■ » S - Ti 
OOC Z*< 


THEN GO TO 2000 
Them GO TO 2140 
2*003 OR CODE 2|U 
-5,0 PRINT FLASH 1 


2101 

2133 IF Z 
213B IF Z 
2130 IF C 

7B THEN BEEP ■■ _ I 

.RT IB,9,"HRS PULSRDO OTfifl TBCLA 
PAU^E 100 PRINT FLASH 0,RT 1 
6,9; M u GO 

TO 2130 

21*0 PRXNT RT 17,0. FLASH l r FRS 
E OE GPABAC10N * PRINT RT 9 

"GRAEO 

"; HT 11.1,3*," EN BSPAnOL “ RE 
TUPN 

21*3 PRINT RT 11 EN IHCLE 

S " Return 

2146 PRINT RT 17,9. FLRSH l,“OnT 
03 GPRHRDOS h FOP X«i TO 

35: BEEP >03,RND«2B N^XT X: GO 
TO $000 

3001 CL S PRINT RT 1 r 10. "CARGAP 
DATOS P GO SUB 0000 

3010 INPUT -OPC ION 7 “jTf 

3011 IF T*."A" THEN GO TO 3020 
■e THEN GO to 30 30 

TO 3040 
TQ 3060 
TO 1® 



CODE T*i69 


3012 IF 

3013 IF 

3014 IF 
3013 IF 
3016 IF 

THEN GO M _ 

3020 CLS LET 0*-XflRGAR BRTOS“ 
LET 3 * ■"UER&OS REGULAAeS GO 
SUE 90® & GO SUB 9998 QUEP 1 P 
LOT 105 OR AU 253,0 OuER 0 GO 
SUB 3120 PRINT fit 13,1, LORO 
' "UER - PE .IS." thflTfl C« H GO SUB 3 
1+5 PRINT RT 13,1 LORO UEC . E 
C,IN*" ORTH X*n INF. 7 LET A.l 
GO TO 31*6 

3030 CLS LET Ofv'XARGRR WTTOS 
LET Sli VERBOS IRREGULAR * " GO 
SUB 9040 GO SUB 0906 OuER 1 
PLOT 1,55 ORRLJ 253,0 OUER 6 G 
0 SUB 3120 PRINT AT 13,1, LORO 
"UER. IR .ES■" ORTR U*CJ GO SUE 
3145 PRINT RT 13,1, LORO UER, 
IP. IN. " BATA X* El INK 7 LET 0* 
1 GO TO 3146 

30*0 CLS LET d*a"GAftGftA DATOS 
LET SI-'UOCABULAAEO” GO SUB 9 
000 GO SUE 999B ODER 1 PLOT 1 
,03 ORRU 2S3.0 OUER O GO SUB 
3120 PRINT RT 13,l r LORD ' UOCA 

e-esp*" data utn go sue 3 i*s 

PRINT RT 13,1, LOAD 'UOCHB-ING, 
" ORTA P*EI- INK ? LET C-l GO 

TO 314 6 

3050 CLS LET 0|» ! CARGflP DfiTOS" 
LET 5*- "EXPRESlONES “ GO SUB 9 
000 GO SUB 9996 OUER 1 PLOT 1 
.65 drRU 233.0 OUER 0 GO SUB 
3120 PRINT AT 13,1, LORO EXPR 
E .ESPi" DATA N|M GO SUB 3145 
PRINT RT 13,1, LOAD "EXPRE.ING. 

DATA Hill Ink 7 LET H*1 GO 
TO 3146 

3120 PRINT AT 9>1^"U0V A CARGAP 
" . 5* 

3130 INPUT ESTAS SCOUR C 1 > ,R* 

0135 IF Rt-’N" THEN GO TO 3000 
3136 IF RJ-' S THEN GO TQ 31+0 

- iSm 


3139 IF COD| R*( >E3 OR CODE R* > 

, ■’3.* 


76 THEN BEEP 


PRINT FLASH 1 
" “ TRA TECLB 


, AT 16.6, 1 ' HRS PULSADD O' 
tl PAUSE 100 PRINT FLASH 0 > RT 1 

M;" ^ 

TO 3120 

3146 PRINT AT 17,9, 

05 CARDANDOSE 




oo 

FLASH 1,"DAT 
PRINT AT 9 


EN ESRRHOL' 


RE 


' i AT 11,1, S-S , 

TURN 

3145 PRINT RT 11,1,Sf, 

S ; RETURN 

3146 PRINT AT 17,9, FLASH H "DAT 

OS CARGRDOS “ FOR X-l TO 

35 BEEP .03,RND#2B NEXT X GO 
TO 3000 

4000 CLS PRINT AT 1 H 

D AT OS" GO SUB 6000 
+B10 INPUT -OPCION 7 
+011 IF T*."A" THEN QO TO 4020 
+012 IF Ti*B THEN GO TO *030 


EN INGLE 


10, BUSCAR 


ri 


*013 IF T|p"C 
+014 IF T|."D 
*015 IF Tf-^E' 
4016 IF CODE 1 


THEN GO TO *0+0 

THEN GO TO *050 

_ THEN GO to 10 

_ _ _ T f (65 OR CODE Tf*60 

THEN GO TO *010 

4B20 DIM U* l 100,161 DIH LfC100, 
151 CLS LET OS-' BUSCRR DATOS^ 
LET Sf-'UERAOS PEOULRRES" GO 
SUB 9000 GO BUB 9990 OUER 1 P 
lot 1 as DRAW 253.0 OUER 0 LE 
T K«fl GO SUB *B0B PRINT FLASH 
1 ,RT 17,9, w TRRSLADO DIMENSION 

FOR X*1 TO 100 LET Uf(XI-Cf 
iXt LET L| fXI -X* EX* NEXT X GO 


L,AT 17,9, 

FDR X-l TO 


TRfl 


SUB *000 

+021 PRINT FLASH 
SLADO DIMENSION 
100 LET CCOO-UttKl LET IlfXJ* 
LifXl NEXT X DIM Ufi$,lSJ Dirt 
- * - GO TO +000 


L* (2,15? GO TO 4_ 

*030 D3H U* I 100.153 DIM Lf < 
15 J CLS LET 6*> BUBCAR 6A 
LET Sf- UtPBQS IRAEGULARES 

“ iur 


1 100 
TOS' 


O SUB 


800 GO SUB 9996 OUER 1 


PLOT 1 r 65 DRAU $53,0 OUER 0 


► 


MICROHOBFYS 
























PROG RAM AS MICROHOBBY 


LET X*B 00 SUB + 600 PRINT FLBS 

H 1,AT 1?.9,^ TRASLADO DIMENSION 
FOR X-l TO 109 LIT ujixa- 
UftlX) LET LH^ixiixi mE*T X 

sue 4 sm 

+ 001 PR IWT FLASH I, AT I ?,S," TRA 
SLflOO DIMENSION FQfl X ■ 1 TO 

100 LET Uf Cfc> BUS CXI LET Xf [)(>■ 
LI-CXI NEXT X DIM UK 3,15* V t» 
L K2, IS* GO TO 4000 
4040 DIM Ut €100-29) DIM Lf [100, 
39i CL 5 LET Oft- 'BUSCBH 5*706" 

let s*-”udcabui_ariq" . go sue 9 

000 GO SUB 999ft oven 1 PLOT 1 
,65 DRHU £63,0 OVER 0 LET X*C 
GO SU6 +600 PRINT FlPSH I,AT 
17,9, TRASLAQQ DIMENSION F 

oh x*i to lee let ukx>-ukx* 

LET Li(X)-PITX] . NEXT X, GO sue 

4BM 

4B41 PRINT ELPSti l.AT 17,0.. " TRR 
SLAOO DIMENSION Tm ' FQR X«1 TO 
100 LET uKXJ-WfOO LET P||X> 

sxf x go t“ ■*" 


L f ( X) ME XT X 
1050 DIM UK 100, 

29 J CL S LET 

LET S*="CXPftt&J0HC5 
000 - 
, SB 


INPUT "CN ESP, 0 EM IMG, * 


TO 43O0 

29 t DIM Lf ii«0 

J - BUSCAR 5AT09 H 
ONES" GO SUB 9 
go sue 0396 oven i plot i 

DR Ay 255 . O OUEfl 0 LET X^H 
GO SUB +S00 PETMT PlRSm l.AT 
17,5.- TARSlADQ DIMEnSIOM 
FOR X-l TO 100 LET U§IX*.NKXJ- 
LET LKXl-MfCXI NEXT X GO SUB 
+ 500 

+ 051 PRINT PLASM 1, HT 17,5; ' TAB 

5LHP0 DIMENSION POP X*I TO 

100 LET NtlXl-UKXl LET HftlXJ- 
LffXi NEXT X GO TO +000 
4-SO0 IP X-I THEN RETURN 
4S03 IF *-0 THEN PR I NT FLASH LA 
T Ift.O.'NO HAY DAT OS A BUSCPR 
FOR XM TO 23 BEEP .10.0 NEXT 
X. GO TO *000 

4ft09 PRINT FLASH 3, AT 17,9, DK T 
0 33i PRINT AT 0,1,“PATO NUHfcRQ 
■AT 10, li-ESPA mBl^hAT 13,1.“SN 
GLE9' 

4035 

4^30 IF 2%w"t" THEM GO TO *050 
4B35 IP Z i »" I Jt Then GO to 4300 
40*0 IF CODE 4| t >69 OR CODE ZK > 
73 THEN BEEP 75,0 PRINT FlBSH 1 
. AT 16,9, rE 1 SPANOL Y i UNCLES 
PRUSE 100 PRINT FLASH 0.AT 1 
e.9i M “: GO 

to 4025 

*950 PRINT FLASH 1,AT 17.9,"BU5C 
ANDO DATOS ". PLASM 0 

4653 INPUT "MODO ESP. t ",5* LE 
T L-LEN St 
4055 FOR J-l TO 1B0 
4 B 5 S FOP N■ 1 TO LEN Uft£J*-L 
4S60 IF 5f*U»UJ IN TO N*L-1* THE 
N BEER .1.0 PRINT FLASH 1,AT 1? 

9."OATO ENCGNTPfiDO . FLA 

SH 0 ;AT ft ,11,0,HT 11 * Xi Ut IJi,AT 
14,l.LftljE GO TO +B7S 
+ B6E IF -J i' 1S0 THEN NEXT J NEXT 
H GO TO 4995 

4B7* BEEP .1,0 PRINT PLASH 1,HT 
16 i9. "DATO ND EnCOnTRADO 
PAUSE 100 FLASH 0 PRINT AT IS, 
9;" w GO t 

0 *995 

4B7S INPUT -fiECTIFICA mGS ? , Z ft 

4076 IF Zft-"S" THEN GO SUB 5*00 
GO TO 4993 

4077 IF 2 1 ^"N" THEN GO TO 4995 

4*76 IF CODE ZfuBl OR CODE Z«0 

7fl THEN GO TO 4675 

4990 print flash i.bt it 9,-Buac 

ANDO OATOS FLASH 3 

4905 INPUT "HODO INC, 7 ".St LE 

T L*LEN St 

+910 FOP J-l TO 100 

4913 FOR N-I TO LEW L ft t U ) -L 

4*20 IF SKLKtJWM TO N +L - 1 * THE 

W PEEP J,0 PRINT FLASH l.AT 17 

,9, DRTQ ENCONTRADO " , FLA 

5H 0 H AT ft, 13. j; AT 11 , 1, lift l Ji , RT 

U-LlJiJ] GO TO +675 

49fi5 IF J i 100 THEN NEXT U NEXT 

N 

49SD BEEP .1,0 PRINT FLASH 1.AT 
16,«,"DATO NO ENC0NTRRO0 
PAUSE 100 FLASH 0 PRINT AT 16, 
9. “ ” BO T 

O 4995 

+953 GO TO + A75 

+995 INPUT OUSCHN05 RLtUNA HAS 

7 " i Z t 

+ 996 IF Z*« iJ S" THEN PRJNT AT ft . 1 


3, FLASH 1, 


" j AT r 11 r 1 


FLA5H 0.AT 6,14, 


Ip 


HT 17.9, 


Zi« 1! N hl THEN RETURN 
COOE 2fcfc75 OR CODE 


ZfO 
FLASH \ 


r , AT 14.1(" 

!s GO T 

0 4B35 
+997 IF 

4996 IF COOE It i ] 

S3 THEN BEEP .5.0 PRINT 
I HT 16 r 9 r ri HHS PULSADQ OTA A TECLA 
PAUSE 100 FLASH 6 PRINT AT 
13,9;" ™: 0 

0 TO *993 

5000 INPUT ^CURL PECTIFICRHOS EL 
ESP, 0 EL INS. 7 — 2S 
3150 IF F * THEN GO TO 51S3 

3130 IF rtB-I" THEN GO TO 5170 
5140 IF CODE 2Ki6* OA CODE Zl < > 
73 THEN GO TO 5600 

5150 PRINT AT 11,1,"-— -. 

---INPUT "NUCV 

0 MODO T ",01 LET Uftljl-Of LET 


TH 


C-39-LEN Of PRINT AT 11, I, Of 40 

ii to e + i! return 

9176 PRINT AT 14,1^'“- 

**•■*--.--- —" INPUT "NUEU 

0 HODO 7 ", Oi LET LliJI lET 
E*29-LEN Ot PRINT AT l*,l r 9t*0 
t I TO E+IJ RETURN 

6000 CL S INPUT "CUAL ORDEnAhOS 
"J - I 
S IF 

EN CO TQ 6100 

5005 IF ZJw"UEBBOS IRPEGULAAES‘ 
THEN GO TO 6300 

6007 IF Zt= ’UOCAftULBRIO" THEN GO 
TO 6300 

6C06 IF Z|= 1 EXPHESZONES" THEN GO 

TO 6406 

5009 GO TO 6000 

6100 IF A*0 THEN GO TO 10 

6101 DIM uk IDO. 15) DIM l | i, 100 . 
16* PRINT FLASH LHT 10,0, E 
STOY OfiDENANDO H< • F 


600S IF Zii-'OEBBOS REGULARES 
510 


liiixi 

EXT X 


LASH 0 

6103 FOR X-l TO 100 LET 

5 IX) LET L t (X> = 11 EX J ME 
SUB 6910 

6103 PRINT FLASH 1 , AT 21,0," 

UN HOHENTO POP FAUOB " F 

OR Xtl TO 100 LET CKX)-UI<X* 
LET IKDiltlXl NEXT X OfH U% i 
2.151 DIM Lf i2,15] GO TO 10 
6300 IF B=i0 Then GO TO « 

6201 DIM U* I 100. 15) DIM L* ( 100 , 
15* PRINT FLASH i.AT 10,O,- E 
STOY O P D E N R N D 0 " F 

LASH 0 

6303 FOR X*1 TO 100 LET UIIXI-U 
1 r X I LET L f 1X) ■x K X > NEXT X G 
5 SUB 5910 

S203 PRINT FLASH 1 P BT 31,Si" 

UN HO HENT 0 POR FAVOR F 

OB X*1 TO 100 LET U 1 ( X > vll I tX i 
LET X|CX) iLt IXI NEXT X DIM LJf r 
2.15 i OIH L* 2.15! 00 TO 10 

6 300 IF C«0 THEN GO TO IS 
6301 DIM U*i 100,29! DIM LK1BO. 
29) print flash i.AT 10 . 0 ." C 
STOY DPDE mAnDO " F 
LASH 0 

6332 FOR X = 1 TO 1DO LET U| [Xi>U 

S i X S LET Li 1 X 1 ■ P t ( >' 1 NEXT X G 
SUB 5910 

6303 PRINT FLASH l.AT 21.0," 

UN H OH E NT 0 POP FAVOR F 

OR X-l TO 100 LET UfiX]>LFKXI 
LET PSIXULtCXl NEXT X DIM U|! 
2,29) DIM Ltr2 1 29! GO TO 13 
6+0C IF M-0 THEN GO to 10 
6401 DIM U t 1 10 0 r 2 9 J DIM L*ilO0. 
29i PRINT FLASH l.AT 10,*;“ E 
5 T 0 V OPDENANDO " P 
LASH 0 

6+02 FOR TQ 10O LET ut£X?-N 

ft I X) LET LKX)-Hi£X> NEXT X G 
0 SUB 6910 

6403 PRINT FLBSH 1 . AT 2 1 , 0 , ’ - 
UN MOHEMTO POB FAVOR F 

OR X-l TO 100 L£ t Nf<Xl»U(lM). 
LET H ft I X) ■L I C X* . NEXT X DIM Vt < 
2 £9) DIM L K 2,2 9 j GO TO 10 
69 ID FOP J- 1 TO 100-1 
6920 FOR l ml TO 100 -J 
6930 IF U| [ll t -Ut* THEN GO T 
n G970 

69*0 if y f 11 * ■* *u t ■ i + n then go t 
D 6950 

6950 LET Tl-yintl) LET Util + U 
-u ft U* LET U* { r* fTft 
6960 LET A1 a L ft I I + 1 I LET Lftll-H 
■ Ltd? LET Lf II* -Aft 
6976 PIE XT I NEXT J 
6969 PBINT FLASH l.AT 10.0." 0 

PDENC ION H E C M A J " P 
OR X*1 TO 30 BEEP ,10.0 NEXT 


6990 

ll92 CLS 
599* 

6993 

6994 

6995 

00 


INPUT IHPRiHO LISTADO 7 


IF 2ft»"S H THEN GO TO 


IF CODE Z|0«3 THEN RETURN 
INPUT "POR IMP RES OR A ? "dt 
IF tt^ S' THEM FOR X-l TO 1 
LPPINT X,"* • ut IX)• LPRINT L 
AINT NEXT K 


PRINT 
PRINT 
TO 599ft 


X F " 

HEX 


S EX :i L PAINT NEXT X PAUSE 0 

O TO 699B 

6996 FOR x-l TO IGD 
;Ui(X> PAINT L t (X) 

t X PAUSE 0 CO TO _ 

6997 IF CODE Zf < >63 OB CODE tt« > 
7ft THEN GO TO 699+ 

6996 RETURN 

BOM PAINT AT 5,5. ,J fl) UEBE05 BEG 
ULARE S".AT 7,5; -ft) UEABOS ERAEGU 
LB PC 3 ,J . AT 9.5, “C* UOC ABUL AR 10, A 
T 11.5, -D) EXPRESIONES V, BT 13.6 
’■E> MENU’". RETURN 

9000 BfllOHT 0 CL5 PRINT INK 2 
,AT 1,1."PROGRAMA DICCIQNARIO +Q 
k, -* kNK 7 , AT a.i.’OPCION: ■, Oft, 
AT 4,1, SUB OPCION “;S|, BRIGHT 
1 ; PAPER 2, INK 7, ATT 16,0, "EBRO 

BIS ". PAPER 0. AT 1 7 , 9, ’ AT ENCION 
PAPER 3.AT 16,0. MEMORI* LIB 

9010 INK 7 PAPER 1 PLOT 0.23 
DRAU 0 . 152 DRAU 255.0 DRAO ft. - 
15S DRBU 365-0 PLOT 0,155 DR 
AU 255.0 PLOT 0 r +9 DRAW 255 C 
ALOT D.11+ DRAU 255,0 PLOT 0 . 
B5 DAflU 235 j 0 
9020 INK 7 OUER O RETURN 
9999 PRINT AT IB^ 16^ FM MI23730I- 


FW M 1 336+1J 
DRAU 255,0 


^9 1 

RETURN 


plot 0.33 


EL BAN CO 

Aitor AGUIRREBANA 


Spettrum 48 K 


Acabas de ser 
nombrado director def 
Banco mas importante 
de Sildavia y le 
aseguramos que la 
responsabifidad no es 
poca teniendo en 
cuenta las oscilaciones 
de la bolsa en este 
pais y en estos 
momenta*. 

En plena revolution callcjcra, {as 
bombas han destruido pane de las re- 
servas del banco con lo que nuesiro co¬ 
met ido cs aun mis dificil. teniendo que 
hacer verdaderosjuegos mala bares con 
las inversiones de nucsiros clienies. 

Para hacer nos una idea, tenemos 
que tener en cuenta que cada c tie me 
necesita diariamcme 2.5 hohbydoiares 
para vivir. con lo que lendremos que 
tener prevista la camidad diariia sufi- 
ciente para lencrlos contcntos. 

For si eso fuera poco, la cantidad de 
reserva bancaria no dche ser excesiva 
ya que si to descubrcn los rebeldes. los 
ataques scran consiantes hasta destruir 
cl ediftcio. 

Con este programa, pues. descubri- 
remos que la direction de un banco no 
es tarca tan descable. 





10 fcEM «t« DIRECTOR EE »ANCC> • 

«i 

4 0 MNMHIZt 
6 S' K,» TO 31 

6.0 HCflC' D 

70 POKE USB .O 

ft® NEXT t| 

90 DATA 66 ftftp19®,195,60,60,19 
S iftl DATA 2+.2+ .60,90,2+ 36.36,1 

lift 0,0.60.60.60,60,60.0 

120 DATA B,192,252.235,2*2.192, 
0 . B 

121 PRINT —————Mg. 


|rin qvi 
it C9k& 
on uifUs 
nirp L*l 

Idi i iIbD L O 

I 

tfun\ir + 

1 3 ftV( f X I f , 

o POf s e 

f* entD ncu 
tUl I AVIf - 

r» cu+nt* " 
122 PRINT 


3 La Pirttiui T* *P! 
titll «n Ur priftir 4 
d 1 ctor . Emptier *1 t 
cLtnlej y citrtD d i 
rtlirMll dtt binco«C 

f € p f t i e r. 1 j dit: yfud 
EL DJ-dtrader it pr 
cu+n to dtntro iunrE 
r f (Uir<n fUtrdif *£9 
viintn *1los dial. 

Ei KdemdGr It di 

ty*nlo h|h p/adUCidO 

iionts ,y j.t pr t90Bft 
”d intro dfftM fepif 
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tir ifttfl LOi lAVCriOrtl* 

Prutfri a t^lvi vi 
r 1ft 4 i 41 £046 d i r *■ f 1 0 r . ye 

r ^t r Mt irini * 

153 PRINT ‘pulj i uOi lt£ l«" 

12* If IHKfVi. ‘ THCrJ GO TO 12* 
lie cl s 

130 LET SF-0 
I*ft let pop-LOG 
150 i-E' 1 ” UHT*2Bft 

1*1 fcS XR5U 

1## LET AE-2*4 
19ft GO SuB 000 

200 QQ sue :i3oq 

210 REM DESCRIFCIOM DE GRI|F IC 

pci^T f P j> i a j : tftiiW 

RRENT INK a. AT 13,11," KSS* 

221' PRINT INK 5i PAPER 4 
l.AT * . 12 . JJ 0«WC - L*0 " 
i'd« P»I-HT IMF *, RT 7.11 

P&iNT Iw 4 > AT 12,11. 

PRINT INF 4 , AT 14 11 

Pis INT INK 4 ; fiT 9,11*" 



FLASH 



11,11 I 
11 50 f 
10 11 1 


S7C 

5*1 PRINT ink 4 AT 
201 PRINT INF 4 .«T 
565 PRINT INK 4.AT 

590 PRINT IN* 2 . AT l* CMR* 1 

594 GO SUE 300 
296 GO T0 2 30 

Jftft PPiPr ? AT 3 1 

CLIENTS ' , POP, ' 1 

30* LE'' uHT.INT i wHT »i5J 
310 PRINT PAP£t * INK 9.AT 3 I 
S.OINERC ", UHT; " 

320 PRINT PAPER 6. INF 9,AT 0 6 

’WB, ' " 

352 RETURN 

330 LET huS^INT lRN 0*3>*1 
302 IF HU**1 THEN LET Aft "HAL 

304 IF HUS *5 THEN LET A|i ACER 
'TBBtC 

336 IF HUS-3 THEN LET Af* BUEN 

-NF 

33* LET H*=="LOS COnSEjEROS AUGU 
pan un "nfli* ■ sr-iA 6e sols*. so 
SUB IIoo 

340 INPUT PflPtf 3 INF 9 AT 0.0 
CUANTO P JNERU INUERT JRA5^ ". SO 
344 IF £D:0 THEN BEEP .9 -12 C 

0 TO 340 

35ft IF SD>UHT THEN BEEP .9.-12 
LET Hf»“NQ TIEMES 1 ■+ ST fil Sfr + " * 
ACQS J " GO SUE 1J0O GO TO 3i0 
360 IF SC- ■ POP THEN BEEP *6,-12 
let Mti NO SE T£ e$TR F'EPh{T lt>0 
IN’'CRT IP MRS OE UN rtQBB-Vl PQR C 
L 3 CNTE GO SUE 1100 GO Tc 34 

0 

370 LET CPR-lNT (RNDt5*HUS*6C ' 
37£ LET JHTiJHT-SD 
374 GO SUB 300 GO SUB 100ft 
376 PAUSE 250 

3#0 LET Mi-^TUS IMUCRSIQnES PRO 
DUUERON ■’+5TRf C«P + " MOievoGL 


flfii.- go sue ii 0 C 

3#* IF CHUB*5 OR HUSiJf AND CAP 
1,9 -SO Then let lilt "InciulA * 0 * 
coitjirai pvt at n ivocine 

io 6U6 nos 

400 LET nKtaght^rf 
*04 GO Sue 3&0 
405 GQ Sue 1000 

40-j pause aeo 

410 INPUT PAPER 3, INK 9,AT ft ft 
,"CUfiNTO DINERG REPAPT3PAS ENTRE 

TUS CLlENTES^' *1 

411 IF II I Then BEEP ,-9.-15 G 
O TO 4 10 

*12 IF ftL-vhl THEN BEEF ,9 -12 

LET ■l-'-NO TIENES TANTO DINEPO' 
GO SUE 1100 PRINT GQ TO *1 

0 

414 IF ft p^pffit THEN LSt if* r 
US CL IE NT E S ESTAN INSAT 2SEECMOS 
I" GO SUB 1100 LET I r * 1 
416 IF ft-p<rp*M*5 THEN LET At* 
■TUS CLlEHTES ESTAN CONTENTOS 1 
GO SUB 1100 LET *p,fMjkpg-l 
450 LET UhT.UHT-ET 
425 GO SUB 100 
*24 GO SUE Jftftft 
4^0 FOP U*S2 TO £ 

440 FOR r =4 TO 10 

*90 PRINT AT K ,Ja‘HP1 14’ 

*eo beep 0.19 

*6ft PAINT AT * 

490 NEXT F 
500 PAUSE 50 
Sift NEXT U 

515 LET RTSaINT <RND*UMT 4 

514 LET Hfa. LQS OQMDARDEOS PEST 

RUTERQN OTP* RT*#" H00BYf 0 

E TUS RCSCPUR* ■ GO !>>ft UQfl 
BIB LET UKT-UHT-PTS 

516 00 Sue 300 00 sue I00S 

520 2F SF.ft THEN GO TO 700 

S3ft LET 00- I NT lPHO+0.5*iP0P*RE 
-ET P 3 * 1 

S3* IF D0-POP THEN LET OP-POP - 1 
53S :*= 0D 0 THEN l£T HfaSTPi -0 

Df PERSONAS SE 1NCORP0RAN A TU 
BBNCO GC SUB HOC GC TO 544 
5*ft LfT HjfSTAs 00# ElIENTES M 
AN R PANPONADO El BANCO 1 G 

O SUB 1100 
544 LET POP-POP-D t> 

go sue ? 0 O go sue mb 

560 LET Hii-Tu!- C fENTES ESTAN I 
NSATISfECHOS 1 ' GO SUB 11ft ft 
570 LET PNG-PNG#! 

SBft IF ANG k 3 then LET Ml*" TU* 
rNUCRSORE* ESTAN TOTALMEiMTE 0ESE 

spE&Acos- - oo sue nee oo to e 

7ft 

590 FOP U*1 To POPy10 
*00 IF J■ 10 Then GO TO SBC 

6 1 ft PRINT AT 9 ,Uh p * " 

62ft PRINT INK i.RT B J. CHPf 14S 

*30 BEEP ft - 2. -15 

6*ft PAUSE 5 

*S0 PRINT AT fi.j/’ " 

6*ft PRINT InK 1 r AT fl.J.-CHBf 145 
670 PAUSE 1ft 

*^0 Nfr f J 

600 GD TO 74ft 

700LET PO-INT £ AND4UKT *ft .6 A€) 

7 10 LET Mf ■STPf PC + " CLIINTES S 

E INCORPOHRM A TU BANCO 1 G 


0 SUB 1100 
72ft LE T POP*P0P+PC 
'JO GO SUB 300 
7* ft GO 5'JB 9ftft 
^5ft LET SC-ft 
760 LET rftiVfttl 

’7ft LET Mf. PASO OTRO PER 1000. *' 
GO *UB 1100 

79ft IF fS-il THEN GO TQ S50 
3ftO GO T 0 294 
35B BEEP 0.36 
64ft etEP ft.e 12 

?.5ft RPIr^T PAPER 5. IN* 9 - AT 17, 
mECHO C0MPL6T AC-! 1ft 

DIPS EN Tg PUERTO * SEARS NQH*Pad 
C- DIRECTOR PERrlRNENTE 
BBft PRINT PARER S INr 9 AT 20 
^ ga ■ Iir r-i , 

UWT A£ i ^ -1-0- GO T 5 11 * ft 

i'3 FCR . !»0P 10 “J 12 

375 PRINT INI- 1 9 -■ CH&i i4S 

■^4 PAUSE 5 
B76 PRINT AT 9 tV 
676 NEXT U 

5 80 PRINT xnp- 1 AT 10 13 :m.e* 1 

A* PAUSE 10 
332 FRJNT AT 1ft 13. 1 1 

36* A« lNT IN* 1. AT 11 l* CHRi 1 
45 PAUSE lft 
BS6 FOR J*i Tft * 

*90 PRINT iNt 2■AT 11 15 ■ 

692 PEEP 0,5.ft 

|94 PRINT iNr 1.AT 11.1= CMA* 1 
596 NEXT U 

^£T Hf»"UNC OE TUS IWUERSOP 

ITS Au BORC-E CE LA kQCuBfl TE HA 

0 c& g8°Trii5c TIRO " W * ll * 

B9B GO TO 115ft 

93ft LCT Pt-CHRft 14S 

910 FOR U«5 TO 15 
930 FOP ♦ TO Ift 

94ft 3^ ROP !■ * 1ft * • J-9 ' *IOft Th£ f, 
LET Pli 

PRINT INK 1 AT j,r Cf 
950 NEXT *C 
97ft P^EXT U 
960 RETURN 
10ftft lE’ Pf-CHPJ 1** 

1010 F0& U-9 to if 
1000 FQC - 1: TO 1ft 
104ft IF UMT t+10*(J-9i#IBB Then 

LET tf, 

1 ft5ft PRINT INF 5 AT U K+20 r( 

10*0 NEXT K 
1070 UE*T J 
IftSft RETURN 

1100 PRINT PAPER 5 IN . fl 9T 19 

i'llS PAUSE Spft 
1120 Pf?INT AT 19 ft 

113ft RETURN 

1150 FOP TO 3 

1152 FOR i*S TO 15 SEEP ^ I 

NEXT I 

1153 i rlS to 5 STEP -1 BEEP 

.05 s NEWT i 

US* NEXT 0 

*155 INPUT PAPER 4. lN>- 9. JUB0R 
3 OE NUEUO^.Of 

IlSft IF Otilfc *-N" OR C*n- M n" TM 

EN STOP 
ii?e CL5 

1160 GO TO 130 _ 
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El cuadro misterioso 


THE ROCKY 
HORROR SHOW 


CRL __ 

Videoaventura _ 

Imporiado 

La adaptation de 
temas peliculeros, 
lanio cmemarograticos como 
lelevisivos, parece ser 
que se esta convirtrendo en 
una moda que no cesa 
Rocky Horror Show es un 
claro exponenie del genero 
que viene a demostrar el 
interds que despnerta entre 
los usuarios esle iipo de 
programas. 

Todo el juego se encuemra 
envueiio en un dima de 
mislerio al que contnbuyen, 
bastante por credo, los 
gr^ficos y los perscnsjes. 

Al principio suena una 
miisica algo pacha nguera y 
aparecen en la parte inferior 
de la imagen, justo debaio 
del trtuEo hecho a base de 
caracteres ensangrentados. 
unos simpalicos bailannes 
que anuncian el comienzo 
del show, 

Y empieza la histona. Un 
antiguo tealro con pmta de 
caseron embrujado se alza 
ante nosotros ilummado por 
una luz tenue v con un 


decorado a base de ray os 
lormentosos, (El efecto de 
ambientacion esra muy 
log t ado.) 

Tras la tniroduccidn, 
comienza el juego Nos 
enconiramos en urva sala 
con vanas puerlas y un par 
de columnas que sujetan 
un corredor superior en el 




* 


t 


♦ 
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cuai hay otra puerta. A 
partir de ese inslante 
empieza una (oca carrera 
contra el tiempo que 
fmalizara con el exito o el 
fracaso de nuestra misi6n 
Tenemos que haliar las 
quince partes de un cuadro 
que se encuentran 
distribuidas por las sal as y 


habitacrones del teatro en 
pequenos trozo®, y I levari as 
hasla el lugar 

correspond ten le, en la parte 
trasera del escenario, 
donde esia tambien 
prrsionera nuestra 
companera o compahero. 
segun hayamos elegido al 
principio a Brad o a Janei, 


Solo podemos ilevar a la 
vez un irozo de cuadro con 
nosotros. Para cogerlo 
bastara con pasar por 
encima de dl, y una vez que 
lo tengamos, habra que 
llevarlo hasla el escenario y 
situario alii. Mientras lo 
transporlamos aparece. en 
un cuadro siluado en la 


parte inferior de la pantalla, 
el fragmento en estado 
flaseanie. Una vez que lo 
hemos deposited© en su 
sitio, deiara de llasear. 

Las puertas splo pueden 
abnrse con fa Have 
correspondienie a la 
cerradura de cada una de 
elias Eslas Haves estan 
tambien repanidas por lodo 
el edificio y en mochas 
ocasiones. dentro de 
habiiaciones que. a su vez, 
habra que abrrr con oiras 
Haves, 

El leatro liene vanos pisos. 
mijiiilud de habitaeiones, 
pasadizos, ascenso/es que 
nos comunican con las 
sales super lores, escaieras 
y loda la decoracion que 
tendria en realidad un lugar 
de eslas caracterfcticas Hay 
un gimnasic que solo se 
puede atravesar una vez 
que hemos encontrado la 
clave que desacliva el rayo 
energetico que nos implde 
el paso. 

Por las habiiaciones del 
lealro enconlraremos 
smiesiros personajes de los 
que hay que huir, un 
motor isla tipo punkie. una 
dama de negro, un 
jorobado que nos arroja 
peligrosos rayos y vanos 
personajes m£s, 

Valoracion: El meiodo 
graiico empleado ha sido 
ulihzar pantaHas bicolores 
con el fin de no enconlrarse 
con el problems de ios 
ainbuios, y el resultado ha 
side bastante posiiivo, ya 
que todas las rmagenes 
esi^n muy bien disenadas. 
ademSs de estar muy 
elaborados icdos los 
detalles que contribuyen a 
crear la ambieniacion del 
juego, 

Un programa para 
disfrularlo, lleno de imriga y 
con un desarrollo original 
en lodo momenlo. 


Onginalidad 


Grdficos 

# * * * 

Mo vi mien to 

* * * 

Sonido 

m m 

ValoraciOn 

* # * * 
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Jesus ALONSO RODRIGUEZ 


TaJ vez *e hayos preguntado alguna vez come es 
posible que algo tan previsible y poco aleatorio tomo 
on ordenador, sea copaz de generar numeros aleatorios. 
En estc artrculo intentaremos encontrar (a respuesta. 


(.os monos v orvulos en mmemaiicas 
qui/a so hay an progun la do quo cs esc 
do los «nu moron aleatorios^. Coniom- 
plcmos Li siguiente serie do numeros; 
], 3, >. 7,„, noscrivdiftcil predecir cual 
sera el siguiente numero do Li serie, 
empe/ando por ei 1 homos ido suntan- 
do dos .1 cadit numero para oblener el 
siguiente. por lanto, cl quo sigue at ' ha 
do sor nccesiiriamome el l >. despucs ol 
11. \ a&isuccsivamcnfc. Yeamosahora 
oira serie: L5,17.53,*.. osla vez parece 
mas dilkil. porn trasun liempo, sc [mo¬ 
de ohservar quo cada numero os el re- 
suliadn do tmiliiplicar ol anterior por 3 
v sUTiiar 2 at praducio. pur tamo, el si- 
gu ionic numero do la serie seria: 53 x 3 
+ 2 = 161. 

A medida quo la operation quo hu- 
bicra quo hacer con un numero para 
oblener cl siguiente se luera h acton do 
mas eompltcada, nos seria mas dilkil 
averiguar la puuia quo siguon Ins nu- 
meros de la serie. 

Omtc mplcmos ah ora la serie si* 
gu ionic: ‘7, 3.0.2,‘). 7,8, 5,0,8..,. on es- 
tc caso nos sera diffeil encomrar una 
relaeion, do hoc ho, no hay emre el los 
ninguna aparonte. La anicrior serie ha 
sidn nhlemda dc una »tabla do digilos 
uleutorios». 

Nosol ros niismos pudromus uhiener 
una serie do numeros aleatorios com* 
prondidos entre I y 6 si arrojamos un 
dado varias voces. > vamos anutando 
los resullado*. 

Se dice, quo el rcsuliadodc un expo- 
rimenio OS un numero aleatorio cuan- 
du todos tos rosullados son igualmenic 
posibles y cada uno do ellos no depco¬ 
de en absoluio del anicrior. 

Do hecho. no ex isle ningtm export- 
memo ouyo resullado so a toialmomo 
improdedble. Si conocieramos todas 
las fuc rzas qu e aplica mos ul dado euan* 


Numeros pseudoaloatorios 


do lu lanzamos a I a ire. podria nuts pre- 
deeir con u>da eerie/a ol resullado. 
Cuando ol resullado do un export men- 
io depende do uu numero de varia¬ 
bles um grande quo nos os impo- 
sible comrolartas, decimus que 
esc resullado es aleatorio. 


l x isle una variable de! sistoma lla- 
m.nla <<SEKD>* quo se encuentra siiu.i- 
da en las direcciones 23670 > 23671 y 
sirve como puntode pariida para gene* 
rar un niimero pseudoa I caloric. 


( uando el inldrpretc de basic so en- 
cuenira con la fLine inn "RND*>. sabo 
que liene que generar un numero 
pseudoalealorto. Lmonecs, mma el 
cuntenido de la variable «S (:!:[)», Ic 
Simla I. mulliplica el resullado por 75. 
lo quo do. lo divide por 65537 sin sacar 
decimal os. ignora ol coeicnlc y loma el 
resio lesto es lo que se llama oblener el 


1.1 proceso de un ordenador, difu.il- 
menic rcsulla susceptible dc product 
resit I lad os aleatorios lodo loque hace 
un ordenador se rige por un niimero re- 
dud do de variables, v todas cst.in con¬ 
trol adas. 

No ohsianie. podemos ohiener una 
sccucncia de numeros en los que la 
pauia segu ida pa ra genera r u no ja 
a partir del anterior sea tan 
eompleja, que no podamos 
dedueirla a simple visia. 

Si adenitis, todos los nu¬ 
meros luvicran la mis- 
ma pmbabtlidad do sa- 
lir. nos encontrariamos 
ante algo bashmic pare* 
cido a una serie dc numc¬ 
ros aleatorios. l-.slo sc co¬ 
rnice como ^numeros pseu- 
doulcaiorios», 

Nuesiro ordenador cs eapa/ 
generar una secuencia de 65536 nume- 
ros pscudoalealorios. a cominuacibil 
vamos a ver como lo hate. 


La variable «$EEb« 


INICIACION 


LOS NUMEROS 
ALEATORIOS 
EN EL SPECTRUM 
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^modulo 65537»>, iucgo le resia 1 y ct 
resullado lo a I mace mi como nuevo va¬ 
lor de la variable «SEEJ)». llnalmcnie. 
divide esc mi mem por 65536 y loma d 
eocienie como resullado tie la funcion 
«RN|)». 

Esie resullado sera siempre un nu- 
mcro comprendido cut re ccro y uno. 
podra scr cero, pero nunea llega a uno. 


El Programs I ilustra cl proeedi- 
miertto que utili/a el Spectrum para 
obtener un numero aleaiorio. En pri¬ 
nter lugar, nos pidc que le imroduzcu- 
mos un valor para «SEED». despues 
genera dos numeros alcatortos par- 
tiendo dc ese valor, uno de dlos se ge¬ 
nera cn la linen 50 mediame la funcion 
«RNn*> y doim. se genera cn laslincas 
f>t) a 100 stguiendo cl procedimicnio 
descrilo. A mhos numeros deheiin ser 
igualesU veccs pueden presen tar se di- 
fercncuiscn d ultimo decimal, debidas 
al redondeo que realtza el llasic). Fi¬ 
nal m cute. nos imprimiraamhosnumc- 
ros para que com probe mos que son 
iguales, .isi como el nuevo valor asigna- 
do a "SI’EDn. El valor que le demos a 
« SI! 1:1 )>' a I principle, debe ra esta r com¬ 
prendido entre 1 y 65535 I am bos inclu¬ 
sive). 

PROGRAM* } 


ici 

20 

m 

%% 

60 

70 

SO 

90 

190 
110 
120 
113 
1 JO 


Lid PROGRAMS 1 
input -SECC'e ’ -.a 
PRINT put' e»lt< 
OftnC'OMlIE i 
Ltt f »CNt' 

LET |i?t» <1 • 1 

LET be* 6-5537 

LET (Xb-lNl 61*65537 

L$T 4»<-l 

LET fb>4 65536 

PRINT f.ffc 

PRINT 'J'.'tvd SEEC‘ ■' 1 

PRINT 

GO TO £0 


Numeros entre cualquier morgen 


Los ntimeros ulcalorios se ulili/an 
en los pmgramasen losquealgun parti- 
metro debe dependcr del azar, por 
ejemplo. un juego de cartas, e) movi* 
miento dc unit nave cncmiga. etc, 

I n eslos cases, neccsiiamos nLime- 
ros entre unos margenes dciermina- 
dos, que no ban de ser necesariumente 
corn \ uno. Para dlo, podemos reali/ar 
las ope rat ion es que deseemos con d 
resullado de <'RNI)», 

l a forma general de oblener nume¬ 
ros aleatorios comprcndidos entre «tt» 
y «b»». umbos inclusive, es: «a+|NT 
<RND*(b—a+1))» por ejcmplo. supon- 
gumos que queremos obtener un nu* 
me ros aleaiorio comprendido entre 5 > 
Id v asignurlo a la variable «v», tecteu- 
rlamos: «LET v=5+lNT <KND*15)» 
Eslo es viilidn para obtener numeros 
enieros, que son los que habitualmcn- 
le ncc esi tare mos en los programas. no 
obstante, lamhicn pudemos oblerner 
numeros con decimates. El procedi- 
miento general para obtener numeros 
aleatorios con «n» decimates y que es- 
ten eomprendidos entre «;t» y «b», se- 
ria: «(n*10 T n+INT <RNLl*(tb— 
a)*!01 n+l»)/l01 n» por ejemplo, su* 


pongamos que queremos asignar a la 
variable «v» un numeros aleaiorio de 
dos decimates, comprendido entre 20 
y 100. tedeariamos: “LET v=20t)O 
+INT (RND*800i))/HKK 


Numeros sin rgpeticifln 


1 lay ocasiones en las que nos iniere- 
sa generar una serie de numeros alea- 
torios que no se repitan. Imginemos. 
por ejemplo. que queremos si muter un 
bombo de loteria, I I bombo puede 
coniener cicn betas, numeradas del 1 at 
IIX). [ na ve/ que ha salido un numero. 
no puede volvcr a salir hasia que no re- 
llenenios el bombo de nuevo. 

En primer Iugar.necesitamos una la¬ 
bia donde ir anotando los numeros que 
van saliendo. Cada ve/ que el ordena- 
dor genere un numero. comprobara si 
esie cxiste en la tabla, si es asi, volvera a 
generar otro, si no, lo anotara en hi ta¬ 
bla y nos lo mosirara en panialla. 

El programa 2 nos imprime en pania- 
lla un numero cada ve/ que puisemos 
una lee la: cuando sc hay an imprimido 
los cien numeros disiintos. el ordena- 
dor sc detendra. 

La niatri/ «a (I00)»cs una tabla que 
comiene eeros cuando no ba salido 
ningun numero. y a medida que van sa- 
lientlo, los va anotando ordenados de 
menor a mayor. 

I n cualquier momcnlo. el ordena- 
dor puede imprint ir, ordenados, los nu - 
mcros que ban salido. hacicndo: 

LOR 1=1 TO 100 

If atlj THEN I’RIN I atf) 

NEXT r 

Tambien podemos «rcttenar»> el 
bombo y empezar dc nuevo, hacicndo: 
«IJIM at loot: LET d=0». 


PROGRAM A 2 



pboc pan a s 
L l 4 n * c >. m:-* fc*c 

L£T jaC 

&( r. € ( j . r r. Jfc t t . . ni 

vei Lt UM LtCtft 

2 1 Ci LET b = 1 + IHT i PflD tiOPt 
50 Sue 300 

£ jo jr c them oo to aoe 

JiO LET dMti 
550 PRINT a. t 

leo tr d NlOffl THEN PRINT “Fin, 
STOP 


f?rru PH 


^E e OO TO JOB 
CoipMitbl I ft 
'£ I* 4 b ' ft ! tn *b 


La distribuci6n de -RND» 


Nemos dicho antes que en una se- 
euencia aleatoria, lodos los numeros 
dehen lener la misnia probahilidad de 
salir, Maiemaiieamentc, se pudria es- 
prcsardicicndoque la Euncidn ha de cs- 
lar uniform entente distribuida a lo tar- 
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INICIACION 


go de lodo cl intervalo. 

Hn una seaiencia pseudoaleatoria, 
csio cs praciicamcntre imposihle, pero 
sc puede aproximar basiante. 

PROGRAMA 3 


50 «KM-irOMt2E 1 
iO DIM 4 <S5&> 

io roe iiii to 

50 FAINT RT iJ.il-UJN 5TB* H n 
«0 LET b * INT tfitl&tii'iei 
7<S L£T > i b* 1 > =i I f- * 1 1 ■ 1 
50 PLOT b,0 ORflU 0.* it * 11 
90 NEXT n 


HI programs 3 genera to do* los nu- 
mcrosde una sceucncia pseudoalealu* 
ria comprendida entre 0 y 255. y al mis- 
mo Liempo. v;i imprimiendo en pama- 
Jl;t la grafica dc su distribucion. En cl 
anguln superior dcrccho. va aparccicn- 
do cl niinicm dc valorcs gene ratios, 
mientras quo cn la parte interior dc la 
panlaJIa sc va crcando la gnilica dc sli 
distribucion, Observe remos que cuan- 
tos mas va lores sc generen. mas sc 
aproxima la grallca a una distribucion 
rectangular. Si tenemosla pacicncia dc 
esperar durante una hora y dieciocho 
mitiutos (liempo que lardan on gene- 
raise los 65536 va lores posibles!, po- 
demos observer que cl rosultado dc la 
grafica es un rectanguio casi pcrfecto. 
i- 

ADQUIERA Sli 
ORDENADOR 
SPECTRUM DONOE 
QUIERA 

Nuestro servicio de asis- 
tencia teen tea, ex pert o en 
estos conputers, garanti- 
za la puesta en marcha de 
cualquier aparato estro- 
peado. 


nosotros se lo reparamos 
y GARANTIZAMOS 
la reparacion durante 
un mes. 


El com«ndo -RANDOMIZE* 


Como ya sabemos, cl Sped rum ge¬ 
nera sus numeros pseudoalcalorios 
partiendo del valor almacenado cn la 
variable de) sjsterna «SEED». Nosotros 
pod cm os hacer que cn cualquier rno- 
mcnioesa variableadopte un valor dc- 
terminado, con lo quo la sccuencia vol- 
veria a repertirsc a panjr de esc valor. 

RANDOMIZE es un comando que 
puedc tenor coma argumertto, bien «0» 
o hien un mimero comprcndido entre 
«l» y «65535», H.n ei segundocast), esc 
numero es almacenado en la variable 
del sistema «SEED» v el proximo mi¬ 
mero aleatorio sc genera partiendo de 
esie valor. RANDOMIZE sinnrgumcn- 
to. cs equivalent a RANDOMIZE 0. 

Cuando ol argumento de RAN 1)0- 
MlZ.fi « ()•>. to quo sc almaccna cn la 
variable «SEED» es el contenido de 
otra variable, conerctamentc los dos 
octetos inferiores de la variable «I’RA- 
MI;S» que se increments 50 voces pur 
segundo, por lo que su contenido rc- 
sulta basiante aleatorio. Esta ultima 
posibilidad sirve para anadir atcaiorie- 
dad a cualquier programa que utiliee la 
sceueneia «RND». El proccdimtcnto 
es meluir RANDOMIZE al inicio del 
programa. con lo que este sc eompor¬ 
ta ra eiida ve? de forma diferente. 


Otr At Aplicnctones de RANDOMIZE 

Una aplicacidn imeresante del co 
mando RANDOM 1/1 cs partir cual¬ 
quier mimero comprcndido entre I \ 
65535. en dos octclos para adccuarlos 
al forma to mi li/ado pur el /-XO. 

Si queremos almaeenar un numero 
en una variable tic! sistema sin reeurrir 
a I engorroso procedimicnlo dest rllo 
cn la pagina 173 del manual, podemos 
haeer RANDOMIZE con esc numero 
como argumento con In quo scatmaec- 
nara en la variable «SEE:D» en cl for- 
imio correct©: tuego. no ha bra mas 
que transferir los dos octclos a su loca¬ 
lization adecuada. 

Otra posiblc aplicacidn tie R ANDO¬ 
MIZE cs la dc atmaccnar un numero 
temporalmentede forma quo nose ho- 
rre con cl comando CLEAR (que borra 
todas las variables del liasic). 

Por ultimo, es rrecucnic ulili/ar 
RANDOMIZE- en conibinaciun con 
USR para llamar a una rulina cn len- 
gttaje maquina. Como tod a Funcidn. 
I'SR necesita un comando dclantc, si 
no nos interesa hacer nada con el rcsul- 
lado que nos dcvuelvc (d contenido 
del par de registros BO. el comando 
mas adecuado ser;i R XNDOMI/I 


HAGALO VD. MISMO 
AMPLIE SU SINCLAIR 
16 K a 48 K 


Vendemos Kits ampliation 
con instrucciones de mon- 
taje y programs de compro- 
bacion. 

ENVIAMOS CONTRA 
REEMBOLSO 


NUEVO SERVICIO A 
LOS SERVICIOS DE 
REPARACION 


tenemos a su disposicion 
todas las piezas y recam- 
bios para (os' siguientes 
aparatos: 


SINCLAIR 
ZX 81 

ZX SPECTRUM 
SPECTRUM PLUS 



COMPUTERS SERVICE 

Corcega, 361 tda. deracha - Tel. 207 11 16 - 08037 BARCELONA 
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TE LO REGALA AHORA 


S t te gusto el Decathlon, Htpersporis va a entusiasmarte Apenas 
aparetido en Inglaterra ya es n 1. y bate lodos los record de venta 

EL PROGftAMA DEL ANO 

Natation, Tiro al Plato, Potro. Tiro a) Arco, Triple Salto, Levantamiento 
de Peso Una sucesion de pruebas con graficos soberbios, 
que ponriran en juego tu habilidad como mngun otro programs hasta 
ahora. Para jugar solo 0 entre varios amigos, con leclado o con 
joystick,.. 


S i aunque te parezca 
increibJe, queremos 
regalarte el Hypersports 
La cinta original de 
IMAGINE, naturalmenle. 
producida en Esparta por 
ERBE SOFTWARE 
Este programs se 
comercializa al precio de 
2.100 ptas.. pero sera tuyo 
com pi eta me nte gratis si te 
suscribes a nuestra revista 
antes del 31 de agosto 

prdximo. 

lEnvia boy mismo lu cupdn 
y recibiras tu cinta a vuetta 
de correo, sin ningun otro 
gasto por tu parte! 



jSUSCRIBETE ANTES 


DEL 31 DE AGOSTO 


{ COMO OBTENER GRATIS TU PROGRAMA 

S r atin no eres suscriptor de Microhobby, envia el Cu- 
pOn de SuscripciOn que encontraras en la Revista. 
Aunque en este cupdn figure que tu regalo son «cmco cm- 
tas virgenes", recibtras el Hypersport, gratis, y con las ins- 
trucciones en castellano, 

SI YA ERES SUSCRIPTOR DE MICROHOBBY, porque 
enviaste tu cupdn con anterioridad a esta oferta, tambidn 
puedes obtener este fabuloso regalo. Para ello, basla con 
renovar ahora, anticipadamente, tu suscripciOn, que te 
sera prorrogada automdticamente por 50 ndmeros mas, 

ademds de los que ya te correspondieran por tu suscrip- 
cidn anterior Al reltenar tu cupdn, si ya eres suscriptor, no 
olvides escribir con letras grandes mayusculas, la pala- 
bra: <.RENOVACION» 

Nola imports me: Debido a! valor exceptional de esla oferta, nos vemos obli- 
gados a suspender hasta el 31 de agosto las modalidades de pago contra 
reembofso y por Tarjeta de CrOdito Por Id tanto. para el page de tu Suscnp- 
Cidn o renova cion, debcs acorn panar un latdn bancario o en viar un giro postal 
a Hobby Press. S A Apadado de Correos 54 062 de Madrid 
















































NTELIGENCIA ARTIFICIAL 


f 


Entrevista con el Doctor Juan Razos 


cPUEDEN PENSAR 
LAS MAQUINAS? 

Jose Marfa DIAZ 

En el mundo de los ordenadores, coda vez suenan con 
mas frecuencta dos palabras magicas que estdn 
comenzando a despertar la curiosidad, e incluso la 
inquietud de la gente; el hechizo se llama (nteligencia 
Artificial, cPueden pensar las maquinas? cPueden 
sentir? cPueden comunicarse con las personas de viva 
voz? 

Para encontrar la respuesta a todas estas preguntas, 
Microhobby se traslado a la Facultad de Informatica de 
Madrid, y alii, en el Sancta Sanctorum de la Inteligencia 
Artificial, el Doctor Pazos Sierra, introductor de esta 
discipline en rtuestro pais y el mayor experto en este 
campo, disipo una tras otra todas nuestras dudas. 



Ordenadores Xerox y Rainbow em plea dos en el d 


Aproveehamos para agradecer la co- 
laborucidn del Doctor Razos Sierra \ de 
[a f-acultad. sin la cual este articulo no 
huhicra sido posihle, y para romper 
una lanza en favor tie nucslmsdcntifi- 
eos, que. eoirm parecc ser practic'd tra- 
dicional en nucstropais, secneuemran 
toulmemo desasistidos en cuanto a 
medios para reali/ar su irabajo. 
Cedcmos la paluhra a I Doctor Puzos. 
t. Nos puedf cotitar mi pocn ht hi Mono 
de fa fnti linenan Artificial? 

Los pioneros de la [nteligencia Arti¬ 
ficial son fundaimcntalmente ires: Alan 
luring, logico y maternalico ingles. 
Norhert Wienner, padre de la ciherne- 
tiica (leorfa de Eu cornu nicaeion entre 
maquinas v h ombres) y John Von Neu¬ 
mann. crcadorde la arquitectura de los 
computadores actuates, los cuales se 
earaclcrizun por dos eosas: por ser se- 
cucncialcs (una instruction se ejecuta 
a coniinuacion de otra) y por la «banali¬ 
dad de la memoriae esdedr. que en la 
memoria del com pula dor pueden coe¬ 
xist] r dates e informaciones 
El puntodc inflexion de la Intdigen- 
cia Artificial hay que cslnblcccrto en el 
a no 1956, cuando en cl Dartmouth Co* 
Hedge (EE.UIU se reuniertm unos 
cuantos invest! gad ores; entre ellos es* 
laba John McCarthy, ereador del len- 
guaje LISP, Samuel, primer investiga¬ 
tor que hizo un programa de damus 
con eapacidad dc aprcndizujc, Marvin 
Minsky, autor junto con Paper, erea¬ 


dor del lenguaje LOCiO* de un lihrodc- 
nominado « Perceptronsu, acerca de ma¬ 
quinas de aprendiztye paralelos. I ■ stuba 
tambien Oliver Sclfridgc, Newell, Sal¬ 
mon y Shaw que despues realizaron cl 
primer intento de construir un «solu- 
cionador general de problemas» deno- 
minado GPS (General Problems Sol¬ 
ving! y eon el cual pretendian eslable- 
ecr lo que en Inteligencia Artificial se 
denomina el «Paradigma de Poder», 
estoes. const ruir un algoritmomuy po¬ 
le me que resolviera lottos los problc- 
mas; posteriormente se vio que este 
cnToque no era el adecuado y sc paso a 
lo que se denomma «P:tradigm;t del co- 
nocimicmoM, la cual dio Jugara la nue- 
va tecnologia queahora esta en luiu io- 
na mien to, la tecnologia de lossistemas 
expertos. 

r.Nos podria dor una definition de to 
({tie se etttiende par inieltf’encia Artifi¬ 
cial? 

Si uno pudiera daruna dcfinicidn de 
lo que es inteligencia, entonces se diria 
que Inteligencia Artificial es la in tel i- 
gencia desarrollada con maquinas, El 
problems es que la inteligencia os un 
concepto practicamcntc indcfinible, 
porque no es medihlc y porque va cam- 
hiando con el liempo. Por todas estas 
razones, es muy diflcit definirla. no 
obstante podemos decir que uno hate 
Inleligenda Artilieia! cuando es capa/ 
de construir sistemas o programas de 
eompuiador lo suf'icientememie fiexi- 


bles eomo para que lengan algun lipo 
de aprendi/aje, algun lipo dc eapacidad 
de decision \ algun lipo dc eapacidad 
de «en1endimiento», sin saber muy 
bicn lo que eslo significa. 

Resumiendo, yo diria que la Intcli- 
gcncia Artificial es la cicncia capa/ de 
hacer uso intcligente de unos artefac- 
tos estupidos Para mi seria la mejor de- 
linicidn de Inteligencia Artificial, 
f’Existe ahtira mis wo affitin tipa de 
programa a si stern a que sett capa: de 
cunt pHr el test de Turin# ‘ } 

Parece que esta prueba la pasd con 
cxito un programa desarrollado por 
Daniel Borrow llumado Doctor, una 
version dc ELIZA, de la siguiente ma- 
nera: el programa estaha introducido 
en cl ordenador y llegd un vicepresi 
dentede la com pallia dondc Daniel tra- 
bajaba acompanado de unos clientcs a 
los que queria hacer una dcmostracidn 
dc su producto; sc puso a tcclear en una 
consol a pensando que estaha conecta* 
do con Daniel Borrow en lugar dc con 
cl programa Doctor; la «conversacidn» 
entre cl programa y el conlundido vice- 
presidente se dcsarrolld asi: 

-humano: <-Pucdo utili/ar cl com- 
putador esta man ana? 

-Doctor: iPor que me pregunta esoV 
-h: Pienso que podria hacer unas 
ventas adicionales de nuestro sislema. 
-D: Por que t‘no esta seguro'.' 

- h: Mis clientcs no han visto nunca 
una dcmostracidn del sistema. 


ZZ MICROHOB BY 














tftserto de sis te mas expertos 


—D: & Signifies esio mucho para us- 
tcd? 

—h: Por sup tics to. 

—D:Parece listed muy seguro, 

—h: Estu es absurdo, 

D: ^Quc quiere usted dedr con que 
esi« es absurdo? 

-h: lixisie nlguna ra/dn por la que 
no pueda uti lizard com pu lad or ah ora? 

I): Cucnieme mas cosas de sus 
dientes. 

—li: Por favor, llamemc al 491IK50 

Curiosamenie, todos las instruccio- 
nesque tenia que dare! hombre Ionian 
que acahur en pun to y, con ci enlado 
quo tenia, olvido leclearlo; eso lue lo 
que le salvo, porque de lo contrario aim 
hoy estaria liablando eon el com pula- 
dor. 

Esto es un ease real dc que una ma- 
quina past) eon total exito d famoso 
lest de Turing. El hombre f'ue incapnz 
de dil’ereneiar entrc el eom porta mien- 
lo de una maquina y cl dc Daniel Bu¬ 
rrow. 

ti Exist e den fro, did campo de fa Inteii- 
fieticia Artificial, algtiti lipo de requisites 
que debt cumpiir mi progratua que lo se- 
para de alms programas nuts convencio- 
naies? 

Un program a conventional es la tra- 
duccion de un algoritmo, en el eual los 
daios, el programa y et control del mis- 
mo cstan muy enlrcmezclados. Son de 
tipo imperativo, es dccir, rcalizan repo* 
mivamenie la mlsma larea sin posibili- 


dad de aprendi/ajc o evolucidn, mien- 
iras que los programas Inteligcncia Ar- 
tilidal se estruciursm de otra man era, 
lo que se llama sistcmas de production, 
en donde dc alguna munera es poslblc 
romper esc deierminismo. Los progra¬ 
mas de LA. tralan habilualmentc con 
problemas de una complcjidad Ian 
grande que nocxisic un algoritmo para 
resolverto, ya que mas que mnncjar in¬ 
formation numericamanojan inlorma- 
cion simbdltea. 

IN us pad rin explica r earn a ex pasibie 
que uti proxrama sea t opaz de manejar 
wforutadbn am bikini / 

Los s isle mas expertos, es cvidcnie 
que no tratan con in format inn inedi¬ 
ble. si no que tralan con conocimicnio 
y esie comic imi onto, la mayoria de las 
vcces aparece de forma ambigua. Ksio 
se real i/a no median le el calculo de 
probabilidades, sino mcdiante e! ealcu- 
lo de posibiltdadcs; hay una confusion 
en esto porque ambas cosas toman va- 
lorcs enire eero y uno. Noes probabili- 
dad porque no se repitc; la probabili- 
dad se define eomo casos favorablesdi* 
vidido porcasos posiblesy aqui no hay 
cusos favorables; cxiste que lal hecho 
posee un coeficicnte de verosimiHtud, 
que asi se llama, y se obtiene de muy 
dislintas mancras: se lo puedc dar el 
propio expertu por la experieneia que 
puedc cogcr el programa; por ejemplo, 
si cada ve/ que se da el sfntomu deojos 
hinchados se Na prnlidu deterrmnaar 
que ese hecho corresponde a determi- 
nada enfermedad, cada ve/ que esosu- 
ceda el sistema experto lo dotara dc un 
coeficicnte dc verosimiliiud mas alto. 

Lo importante cs que ya exisie unas 
herramienias para tratar la informa¬ 
tion amhigua, la logica « Fuzzy* (de di- 
fusa), el algebra Fuzzy, etc. 

Hi asm que pit nio depende fa Inteli- 
gencia Artificial de un hardware especifl- 
came rife tiiseHado para elia? 

Bueno, esta es la famosa pregunta 
que es muy imporlanie que sc haga. 
porque en informilica puedc haccrcc 
easi cualquicr eosa empleando cual- 
quier maquina, lenguaje y entorno de 
programacion. 

Los problemas JA padeccn el »sin- 
drome dc la explosion combinatorial, 
cs dccir, a partir de una configuration 
muy definida y simple, sc alcanzan una 
cantidad de ramificationcs fucra dc to- 
da medida (cl caso del ajedrez, por 
ejemplo). 

Sin embargo, existen maquinus, len- 
guajes y en tor nos de program acidn es- 


pec ill cos para la Inteligcncia Artificial. 
La ncccsidad dc acccso rapido a memo- 
ria condujo a fabricar maquinas espe- 
cializadas con ligeras diferencias res- 
pccto a la arquileciura Von Neumann, 
Las m;ts conocidad son ires; 

Xerox, con sun mode los Dolllne, 
Dandelion y Dorado; nosotros lene- 
mns el mas pequeno. euyas caracteris- 
tieas son: 

1.5 Megabytes de memoria central 
ulilizando como entorno dc progra nut- 
cion d Interlisp I), el m;isavanzadodd 
mundo, pucs permile ct uso de venta- 
nas, raton v lenguaje orientado a obje- 
los (lipo Smalltalk). Tanibien soporta 
el Loops System 1, sisiemas. «<concha» 
escnciales para cl desarrollo de sistc- 
mas experto$, El prccio ronda los 4 mi- 
Ilones de pesetas. 

La maquina Lambda posee 67 Mb 
de inemoria central cxpandible a 2(X)(> 
Mb, pero presenia el problem.! de que 
solo utili/a i-lSF' y et coste a I can/a los 



El doctor Paioj. 

100 milloncs de pesetas. 

— La maquina Symbolics soporta 
LISE v PROLOG (como los demiisi; 
posee 32 Mb de memoria central y una 
memoria virtual de 1000 Mb, 

Lo verdaderamente imporlanie es 
que la idea dc desarrollar una maquina 
especial i/ada para la IA permite resol¬ 
ver de una forma elegante la conlradic- 
cion entre la factlidad de eserhura en 
un lenguaje de alto nivel y la eficiencia 
del eddigo generado, 

BASE DE CONOCIMIENTOS 


lQue as una base de conocimietuos? 
Al eonjumodc daios y/o hechosy las 
rcglas operatorias sobrc esos daios, 
bien establecidas o heuristicas i«dedu- 
eidas de la cxperiettcia»J se le conoce 
eomo una base de conocimienlos. 

En Inteligcncia Artificial cl conoci* 
mienio cs la sumu de tres cosas; 
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pr inteugencia artificial 

- Un conjunhi de h echos o da los. 

— Las tcorias y/u creencias que per* 

milcn que esos hechus lumen cohcreu- 
cia 

— Las reglas heurislicas relativas a 
csos daios > tcorias. 

Para resumir. podemos decir que 
una base de conocimicnlos es una tie 
las ires paries de las quo const a un sis- 
tenia ex per to; uira, la I vez la mas ,ipa- 
sionante, serin ol *< motor do inl'eren- 
eiritt o «muquina dcductiva», quo dice 
eual regia sedispara sohrc losdatosque 
tengo, construyendo los esqucmas de' 
razonamiento. y por ultimo. la inlcrfa- 
cc eon cl usuario o intcrprcte on esie 
easy. 

Lstos sistemas experms lienen dos 
caractericlicas: 

- I tcxihilidadcn el senlido dc uuio- 
modtlicarsc, dc aprenderen definitiva. 
aunque de momenio este aprendi/ujc 
sea sola monte mcmorisLico y supervi- 
sado por seres humanos. 

- Transparency, en el senlido dc 
que haecn ra/ona mien los > Megan a 
conclusioncs explreando como Megan a 
el las. 

La tlexihilidad hacc que las sisiemas 
expert os scan mcremen tales, es decir, 
van aumeniando su cotiocimienlo y 
pueden absorver los eonocimientos de 
i mi eh as personas, como sc demosiro en 
el easo del si sterna experioen Geologia 
Pruspcdor, emo aulur deposilu en el 
lodo lo que sabia an les de su preniatu ra 
muertc a causa del cancer. Poster lores 
in center os y gcologos h icier on lo mis- 
mo. mcjoranclolo. 

Que qticdc elaro que los S, I no van 
j ser la panacea que rcsuelvu cuatquier 
COsa ni van a su slit u i r al hombre en ah- 
soiuto, piles solo sc uiili/aran en si lbs 
donde no existnn los experl os o sea 
muy caro opeligroso muntcncrlosipai* 
ses suhdcsarrollados, localidades aisla 
das. etc). 

f, Exist t nlfiitiut pQxihilidatt de que un 
sisiento experro liege o sup?far a sits 
maestros? 

I n mi opinion, el becho dc la exis- 
leneia de los S.E-.. vu a permilir al Horn* 
bre'dar un saltocualitalivocn su propio 
conocimienlo, lie hecho, Ilegara un 
momemo cn que cl S.H. sc pa mas que 
ulgunas personas, pern luego llegaran 
otros que lo sopera ran LosS.f:. son de 
lipo consulitvo. no dccisorio; son am¬ 
pliations de la meme y no permiten 
que la persona lenga altihijos cn su jui- 
cio por ra/ones emocionalcs o ajenas a) 
tenia cn esludio. 


■ 

N 


iCoino st puede catUJicar el conod- 
mien to ptun hater!*) aceesible a un ofde- 
nador? 

La parte del conocimienlo mas fik'il 
(Je voilillear. las reglas heurislicas, esla 
model i/uda cn computadorcs desde 
hacc liemjm (por cjemplo, la I curia de 
la Rclatividady I >c lo que se traia no es 
tanlo dc iraducir cl conocimienlo liu- 
mano a un com pula dor. sino de haccr- 
Lo cxplfcilo: donde mas sc da csio es cn 


curse a aratquler tarea?y si es asi, st en- 
hud siempre u troves de un Si sterna Lx- 
pcrtn o hay tine mar arm ripo depragra- 
ma? 

I I area dc aplieacion dc la Inieligen- 
cia Artificial puedc ser cualqutcra. no 
hay un campo vetado. 

No neccsariamenlc lodos ins progra¬ 
ms en I indigeneta Artificial ticncn 
que ser Sistemas I xperlos; pueden uti- 
li/arse algoriimos cspecilkos I \ para 



i 


Junto at eqmpo listo para comenzar a progiamai 


las regl.i\ heurislicas; por cjemplo, cl 
«ojo clinico>» dc un medico, que no 
puede cxplicar racionnlmcntc su diae* 
nostico pern el sabc que es ;tsi \ adcniAs 
acicrla. 

Ahora, cl cumpulador permite que 
las ideas imuilivasdel propiocxperioal 
in st rumen tar las cn un lenguajc de 
computador, sc le hagan acccsiblcs a cl 
niismo, es decir. puede llegar a emen- 
der al me nos hast a cieno punui comu 
ha llegadu a una conclusion cierta y 
aparenlemente irrational, 
i. Que posibUkfades hay tic tint una 
indquiita Negur a eamprtntltr el lenyuaie 
humana? 

Los prohlcmas que se plantcan son 
dc sip mikado de las pa la bras, de con* 
texto; cs decir, una misma pa I a bra pue¬ 
de significar cosas completamcnie di- 
rentes; no cs asunlo puramentc sin- 
lactico; esc csta resuclto desde hacc 
mucho liempo. 

l:n elcsiadoactual de nuestroscono- 
cimientos. el prublema es irresolublc. 
aunque en mi opinion, es algo que se 
eonseguini tarde o temprano. 

Sin votos ni limites 

a La Inteliftertaa Arti/icuil puede apli- 


rcsolvcr pmhlcnias concreios, aunque 
comercialmente es cierto que se hacc 
especial hincapie cn cllos, 

r’Es cierto que donde tnds tlinert) se in- 
tier ft- en fnteliyencut Artificial es en Sis- 
teams Expert us militares? 

Kvidcntemcnte, el gohterno amen* 
cano, por cjemplo. subvenciona el 60 ii 
de los proycclosdc investigation de In* 
iciigeneia Artilkial, ) a cambio, exige 
una eon l rap rest aci on de los investiga- 
dores. 

Que quede elaro que igualmenie se 
potcncian cl resto de las aplieaeiones 
no militares. como por cjemplo. erise- 
nan/a asistida por ordenador. 

fCree mied que existt la posibi/idad 
de que sepermila que un St sterna Expert o 
tome deck tones sin iuterveueiati hunitt- 
na? 

No, no. I so csta mu> elaro. Son sis- 
icmasdeconsului. Ahora. si cl hombre 
hacc dejacidn dc sus responsabili du¬ 
des. algtiicn o algo tendra que asumir- 
las por el, 

De a inert fo. f Eero no tree a nets favti- 
Ne que suceda in stamen tv eso? 

No, no. Vo creo que al hombre lo 
que mas le gusta csdecidiry jamas va a 
hacer dejacidn dc cso. La genie lu que 
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de verdad quierc es poder, y la forma 
v isjhle ilc cjcrccrlo es lomando dec is ju¬ 
ries, 

iLa Intelifienda Artificial pretend*’ 
duplfcar lu inteliyencia Humana? 

Lxisten dos csoiclasen InteJigencia 
Artificial: la de Simulation, que pre- 
lende cupiar al cerebro humano, y hay 
olra a la cual pertenccemos la inmensa 
mayoria de los mvesligadoresquc no nos 
imporia si imita o no, lo unico queq ac¬ 
re mos es que eslos sislemas resueJvan 
problc mas. 

Yo crco que los dos modus dc enfo- 
carel problema son comp lent eniur ins; 
una mejor comprension de nuestra 
mentc nos avudara a hacer mejores 
prog ram as dc Intcligencia Artificial y 
vicevcrsa. 

Nosotros gucremos hacer aviones y 
no pajaros; q ueremos u nos sitemas con 
alias prcsiacioncs, guc no lie non por- 
guc ra/onar igual guc una persona y dc 
hecho no lo haccn. 


Ciencia Ficci6rt? 


Si a utt sixtema experto <ie te dotara de 
oryanos... 

Un robot, si; cs un Sislcma Experto 
con worganos scnsoriales». 

Efeciivamente. /Seria capo: de apren- 
dcr par experiencia dlrecia. de forma se- 
mejanfv a fa Humana ? 

En cl momenlo actun I no. Nosotros 
dcniro dc las linens dc ivestigadon gue 
tenemos en la Paculladesta claprendi- 
/aje dc maquinas. y dc momenlo cl 
aprcndi/ajc guc sc puode hacer cs prae- 
tieumente mcmoristico F slam os muy, 
muy lejos dc conseguir que una maqui- 
na aprenda por experience direcia, 
sensorial. 

iSaben usledex si la inreiiyencia ro 
un idci rtecesariatnente a fox sentimientos 
y emoeianes? 

Yo crco que si. eh... 

Quient dear en ch aw dc ta x coniputa- 
doras. 

iMenudo problema’ Crco que para 
lencr la capacidad de resolver proble- 
mas no sc necesitan emocioncs. Yo no 
eslableceria una analogia emre hom- 
bres v eomputaduras. Para dcsarrollar 
inieligcncia cn cl sen lido dc capacidad 
para aprender. resolver problc mas y ca¬ 
pacidad dc «entendimiento» no sc nc- 
ccsitan emocioncs. Yo no lo pondria 
como condicidn neccsaria, aunque 
desdc un punio dc vista teorico tampo- 
co lo descar la rta. 


Mieniras los compuludorcs scan lu 
gue son. dilicilmcme scran emotivos, 
Si sc const ruyera oini maguina. digit- 
nios mas «blanda», quien sabe. 

/.Exisic a iguana rcUnion citin' fa inte- 
ligcnciti A rtijhiafy ft is supuestos ordena- 
dores bfatagieps ? 

Evidcnienemcnle. los ordenadorcs 
hioldgicos podrian llcgar a scr cl hard¬ 
ware dc hi Intcligencia Artificial. 

En ef sent i do dc u (ifEar materia vie a 
para amipuiadnras. /.dtria usted que fa 
frtiefiyencia Artificial prticndc conseguir 
un sislcma consnciUc? 

Desdc mi panto dc vista, no. Sc pre- 
lende consiruir sistemas guc rcsucl- 
van problc mas dc la vida real para los 
guc no existc un algorUmo concrclo o 
guc esie cs um complejo guc cl liempo 
dc cjccucion seria impracticable, Esie 
cs al monos, cl lin actual dc la Facultad 
dc Informiliea, 

*.Cttdf cree unfed que puede scr cl im- 
pacto dc fa fniefigenda Artificial en 
nuestra societfad? 

Cuando se dice guc los ordenadorcs 
van a dejar sin irabajoa todo el ntundo 
yo primero considcraria lo guc esui pa- 
sando; los paiscs mayo res fabricantes 
dc compuiadores son los que ticnc 
mayor nivcl dc empleo. Scgundo, aun 
cn cl supucsio de guc dcjarait sin iraba- 
jo a lodo cl mundo. i.quien ha dicho 
guc cl trabajo sea hue no? entendiendo 
por trabajo ague! guc no cs recrealivo. 
sino rul inario y mccanico. 

Sin embargo, sohre las aclividadcs 
intcleelualcs y crcalivas, cl unico im- 
pacto sobrccllasseni para potcnciarlas. 

Id que yo digo cs quo cstii bien guc 
sc acabcn cuanlo antes ague!las situa- 
cioncs gue obligan a guc la genie Ira- 
bajc unica > cxclusivamenie porque 
necesitan un salario. 

No crco gue la ociosidad. guc es la 
mudre dc la cieneia. cause problc mas 
psiquicos o ITsicos. No entiendo bicn 
esc atan Uc poncr a la genic a Irabajar; 
la gente hay que puncrla a hacer aque 
llo guc Ic gusto y darlcs cl salario ade- 
cuadu a sus notestdades, problema 
masccrcano a la economia guc a la In- 
teligcncia Artificial. 

IQue posthiUdades tic tie la Inteligen- 
eia Artificial de introducirse cn ef men u 
do dc los ordenadorcs caserns ' 

Podrian existir perfectamenic Sistc- 
mas Expertos dc «primeros auxilios>>, 
ya que el problema no estriba en la es- 
casa memoria de eslos compuiadores; 
es mas dillcil la csiruciura y construe* 
cion del Sislcma Experto. Una vc/ 


const ruido, la cjccucion se puede opii- 
mi/ar hasiamc. Adcmas, los problc mas 
dc cosies y memoria cadu vc/ licnc me¬ 
nus sen lido hahlar dc cl los. 


La quinta goneracibn 


f.Quc es la quinm generation de ordc- 
tmdores? 

Es un proyecto japoncs guc licne 
unas caracteristicas curiosas y especia- 
Ics; en primer lugar, la preicnsion cs 
consiruir un enmputador basado cn 
lee nolog i a VLSI, con una arquitcclura 
no Von Neumann v guc llevaria como 
nuclei)dc soliwarc la programacidn Id- 
gica, el lenguaje PROLOG, para cons¬ 
iruir llnalmeme sobre todo esio Sisic- 
mas Expertos. 

Sc pasaria dc la inlbrmatica del <tco- 
mo» a la del «guc». cs decir. solo ten- 
driamos guc dccirlc al eomputadur gue 
os lo guc gucremos guc haga, 

A pesar del avarice de las 
maquinas, el hombre sigue 
siendo y sera, imprescirtdible. 


/.Se ha ohtenido afyun resuitado to ti¬ 
er do verdaderamente revotuciottaria? 

De momenlo, nada. Sc va a desarro* 
liar muchisimo lo guc ya cxiste, a pare* 
cenin nuevas lecnologias. nuevos Sis- 
temas Expertos > la invcstigacidn sc ve- 
ra cnormemenle potenciada por la ire- 
menda inyeccion dc dincro guc cl 
proyecto guinia generation ha supucs¬ 
io para la Intcligencia Artificial. 

/Cuales la situaddn de lo Intetittencia 
Artificial en nuestra puis? 

Puedo dccirie guc yo soy el intro- 
ductor dc la Inteligencia Anificial cn 
cstc pais y la siluacibn dc la investiga- 
eibn cs desasirosa; practicamemc sin 
medios ni respa I do of kia I de ningiin li- 
po. luchamoscomplclamente solos pa¬ 
ra seguir investigando cn cste lerreno; 
te nemos so brad os conocimienios para 
croar Sistemas Experiosque funcionen 
y muy bien, pero no lenemos medios, 
repito. Asi no hay manera dc aleanzar 
al reslo dc los paiscs ni muchos menos 
aspirar a vender esta tecnologia. 
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PROGRAMAS DE LECTORES 






7 FO b fl*5^TO 40 PLOT I NIK, ft. 
5ft *9 . 9 DKPtJ INK ft 9*-T 9 *21.0 w 
eXT 9 PLOT INF ft, 111,*1 DRAU I 
NIK aNft.LB.liS f6r 9=0 TO 1 PL 
or INF. 4,74^4^,^ 

plot los.si opflu in* l.-ULfl 
, - 1 PLOT 102 „ ftl ftPAU IHk 4.5,- 
PLOT 102. 51 DPflU ink 4 
.-£* 9 ,-4.1 NEXT 9 

3f I^PINT AT i ir'FMEL '' 

50 IF fucift THEN LET Mj-200 P 

HINT INK 4. PAPER 7, FLASH I r OR 
ICHT I,AT 3,Sr J COHOU^TIPLE AGGTA 
OO j BEEP 3,-ie 00 TO 15g0 

52 PLOT INK 7,55,153 &AAU IIP I 
GNT 0, INK 7, RARER 7.200.0 

54 PLOT 55,153 PRAU BPlCGNT 1. 
PAPER 4, fu 

70 IF iNxtvf * ' i THEN FOB fe*l> 
TO I STEP -I LET c-1 LET Cft-tt 

71 if Inkey f ■”a“ and k«i AnR b 
THEN GO TO 2000 

72 IF INKEY**- Z" THEN PP3NT pT 

Lb," LET |i|4 1 

73 JF iNKEv * a q" THEN PAINT AT 

i . M L LET i=4-l £F h*l 

t MEn PRINT HT 4 *2,b+2. " 

74 IF 4 *5 THEN lET 4*5 

75 IF InkEy t ■"p” then FOR &*b 
TO 2ft XTEP 1 let *t*bf LET t-1 

7ft IF h E 0 AND 4=15 AND to'56 AN 
P INKEr fi "O THEN LET K*1 BEEP 
H 00 7 £B BEEP .004 .31 

77 IF K?I AND 4*15 AND b»l Pf#0 
INKEY I* O' THEN LET h40 LET »i 
** Li PHINT INVERSE 1 , BRIGHT 1 
INK 4, AT 0,1ft. 11 PRINT INK 3. 
HT I- ,b*a. ■-!*", AT 1ft, ft* 1.' F 

OR d£0 TO ft ©E*P -04,30 I&EEP ■ 
02.29 iEfP ,01,2S NEXT J PR IN 
T INF a,AT H v 

7ft PS TNT AT 43. j, '■ " LET j = 

j-1 3f j*S THEN LET jO0 PRINT 

Ar^af^i 3 * 0RICrtT 4 " PfiPEP s, 

79 PRINT AT L4,30-b r INK 1," 
,HT 14 . j. , " . " LET tutl IF 

. aa them print at 14 . 29 . pr 

IGHT |* PAPER 5.AT 10,39. LE 

7 ftO^PRlNT AT 4.b r Ct BEEP .005 
*-;7 IF Kmt THEN PRINT INh i.fiT 
4 t 1 ML 1 

ai LET ru*fu-.£ go $u& 1000 
§2 IF 4iil0 os 41 =2^ OR 
THEN GO SUti 30*0 

ft3 IF #Ms^=73 THEN CO TO 50O 

0 

04 PRINT ftpIGHT I PAPER 5.AT 

tl V ir\*;K ?hW\V f, =36 LE 
T hMh«*l FOR 9*0 TO IB BEEP + 
07.9 NE-T 9 PRINT RARER 1 EH I 
GHT l r IHf 7 , AT 0.ft„h4 

Sft IF INKEY t THEN GO TO 70 

THEN NEXT b LET C-0 


90 
100 
1000 
40 10 

ieii 

1015 

101ft 

4017 

102* 


THEN GO TQ 4500 
THEN CO TO 1100 
THEN GO TO 1200 
THEN GO TO 1300 
THEN CO TO 1250 
Then GO ^0 lOStf 


S.O.S. 

Ado//o LOZANO 


NOTAS 


La serial S.O.S. acaba de sonar en nuestro emisora y el 
equipo de salvamento ya esta dispuesto para la 
localizacion del objetivo en el Marespectrum. 


Sohrcvolamos la zona hasta encon- 
trar resios de un naufragio, Mas alia, 
ccrca dc un pcqueno isloic, sob re on 
casco dc barca volteado, tin os supervi- 
viemes intenlan ulean/.ar la roca sin lo- 
grarln ya que tnllnidad dc libu rones, al 
parcccr hambricnlos, custodian la zo- 
na. 

Nosol ros, pi I ota n do un hclicdplcro, 
debemos iralar dc salvar cl mayor nu- 
mero dc naul'ragos, una mision dillcil si 
tenemos en cuenta la sHuacion del bar- 
co y la gran cantidad dc gaviotas ouc 
mcrodean por la zona y quo pueden. si 
no lo evilamos. daiiar la helice, Por 
oiro lado. si tardamos en llevar a cabo 
cl rescale, nuestro combustible puede 
acabarsc, otri> problem.i mas a lencr en 
cucnta, Para su manejo, noolvidar gue 
con tarn os con Jos siguientes mandos: 


«Qj>, para ganar altura; «Z»>, para per- 
derla; «P», para desplazar ci hclicopte- 
ro hacia la dcrccha; «l», para ir a la iz- 
quierda, y «0», para coger a I os ndufra- 
gos. 


sue 15.0 ea 

*4*0 L£ 


« =0 LET t ■ 15 
*■7 LET b.«l5 LE 

- LET b%." % 


l, IMUER&E 1, 
! ,H , l*r *.WT 

S AT 0 . H a 


JNK*1 
». 1* . 

Jl*JP}!T a ** lQ XLJ*- IK ^ 

R s > RT «JtSjkS!4, - 'WTfv- 

v. ^v, ^ 


r 46 p 26. 1 I 

MSI ‘ PRINT INK 


^ V, v-H 

FISinV i16k 

NK 1,A? 17,26. 


Premiado con 15.000 ptas. 


Spertrum 48 K 
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NOTAS GRAFICAS 


4 PRPE& 0 INK 7 BORDER 4 

5 GO SUB 3 30 1" 

10 CL3 FOP n.0 TO 55 PESO b 

poke uSR *"**,& nE*t n 

11 OftTA 834.234,254 H 0.239,239*. 
239 ,9 

1£ DOT A 5ft«#S r 180 h840,232,852, 


"IRC 


105& IF fe=i-I OR b ■ i THEN CO TO 
1500 

1060 IF fe-31-b OR b*30-b THEN GO 
TO 1500 

10^0 I F h■ 1 AN& b -io OR K * I AND 
b>ll THEN 00 TO 8000 
lOftfl RETURN 

110*? IF b 3 THEN GO TO 1500 
1410 IF &■££ THEN CO TO 1500 
1120 IF be* OR b = l4 THEN GO TO 1 
300 

1152 IF H ■ 1 THEM CO TO 2000 

lias RETURN 

1200 IF fc *9 A NO b 49 THEN CO T 
0 1500 
1210 RETURN 

12S0 IF bM OR b-jM THEN CO TO 
1500 

1280 RETURN _ _ _ T 

1300 IF *>»9 AND b<*!3 THEN CO T 

! 3 tt" IF b f *25 AND b-:t2S OR b < *3 
AND hr! THEN GO * 0 2000 
U90 RETURN 

1 S 00 IP b - 0 THEN let b-1 

1505 I F b iift THEN LET 6*87 PRI 

NT AT 17,30, 

lft 10 FOR 3=0 TO 40 SEER ,004,30 
-9 BEEP -0006,5 PRINT RARER 8 
ftfllGNT 1, FLAiti t.. jm 6, AT * r b 
, C f PLOT b * ft 4 1 ft r 1 ** 0 ~ i**0i ORAL 
3Nh 6j RNOi40 -20, 10 PLOT b+ft+15 
. 170-l,#*ei ORfiU INK 2,RND*40-20 
RnD *20 PLOT b*S*15 . 170- <4tftj 
dRRU INI- ft . RND-*O-2O,RN&420 NEX 

15^2 LET htahf^l 

1313 IF he : = 0 THEN PRINT AT 10.1 
.'HR DE STRUT DO SUft MEL I COPT EROS'" 
CO TO 5000 

1583 IF Kf0 THEN CL § GO TO 2 

t 00O FOP TO 1ft PRINT fMV 

r AT 6EEP .OB ,20-9 B 

EER .04.21-9 &EER ,03.22-0 PP I 

NT AT s r b + 2 ■' NEXT £ PfilKT I 

NK 2 ,sf 9-l,btai M T’ 

2010 FOP 9=0 TO b*l 
5; BRIGHT I AT IB.9 
2,-10 PRINT ftPICHT 
T IS,9, r ' "' NEXT 9 

1, INK £, PAPER 7, 
a-9 ;■■*■■ beer i -30 

SO20 LET lUiiyN CL5 GO 2 

3000 INh 2 PRINT AT 4,10, 

PLOT 03,137 pBflU 5.-24 -2 € 

le ga,m f a ink 0 

30 10 IF cl^tf AND i«7 AND b»9 Th 
EN FOR 9 >Q TO 200 STEP ID PLOT 

ftft . IS 3 DflPu PAPER 4 . BRIGHT :, 9 

jO BEEP - 004 .30 PEEP .00 3 . 3 1 
BEEP ,008.32 NEXT 9 LET *£■*>+ 
1 LET /us20O PRINT at 4.10, 

-. AT 5,12;’ J h \ AT ft. 12. " ".fTT ? 

■ *■ 

ilO* RETURN 

ft 000 PRINT INK 2 , AT 4.1. ‘HA RE SC 
ATAOO A ' ■ 45 r "NAUFPACOS ," “DEB I 

DO A SU PILOtnj£ PUEt‘£ CONftlOEgA 
R5E RESPONSfiftL'E DE LA MUERTE DE 
i-.4U." PERSONAS iflRIPa 1 IF »£i 
iu>=73 then PRINT flash i r RT S,2 

, J, es usrip un eueti piloto^ 

5018 PRINT HO, — PULSE EH PAP ft UG 
LVt* A EHPE2AH" PPInT a 1 'PULSE 
r r» I CftCft PAR Aft" 

ftO20 IF INK!EYi- ,, l- THEN GO TO 1 
BP 30 IF IN h £ Y f ■= 'A" THEN STOP 
ft0*0 CO TO 3020 

50 O 0 LET £ }■ 1 ■ SO Si + ■—■ — — * * .SOS- m 1 

-SOS.TOP 9 -3 TO ? LE 

t TO mull BEEP^il ,40 

BEEP .1,40 BEEP ,1-40 ftECP - 
ft. 4D 6 EEP .3.40 6 EEP .5.40 PR 
INT AT 3.0, BRIGHT 1, PAPER *■ 1 

m 0,11. AT 80,0 e < ^ , 

6010 PRINT FLASH 1 , AT 4 14, 305 

6020 PRINT AT 6 * 1 — EMERGENC3A ST 
OP HA NAUFPACADO UN PftPCD.73 5U 
PEftUlUlENTES STOP PELlGRO DC TIB 
UflONCS V CAUIOTAS OUC OIFICULT«N 
EL AESCATE STOP hCLICOPTEAO NO 
OR l^A LE SUMIN 13- Tpfeft COHoQftTl 
RLE STOP SUE 

RTE STOP * 

3030 PRINT AT lft,0. HftNEJO ■ 108 

arnti (2 i aba j o " ' (PrdoreCh* 

lili 1 29L j * I- a*-"' '■ iCpmti 
ur Pijc f •' * 90 " 

3100 NEXT 9 PRINT HS5—‘PULSE UNA 
TECLA" PAUSE 0 PAU*C 0 HCSTO 

PC 

9000 FOP fj-USP TOW r"*7 

RE At- 4 POKE h.* NE^T h 
9010 CAT A 255,2^127,135.133.127, 
0,33.240.0.253,134 .10 1,12B,0,1*8 
P 25S. 12ft .2fti 22ft . l&l . 2%* 14* .252 
,03,0,191,69.166,1,0,3 
60£6 t 1 AT A 136,1*4,99, 0,0 .132 F 139 
p 112,0 r 0,2.7,14 .aft ft0.126.64 , BO 
124,66,60.40 40 . 40 
9030 DATA 136 6D 32,0,17,10 4,0. 
0,0,120 lift.127 39,39,163.0,0.0. 
l47. 139, 141 .237. 141.0 0.0.C . 254, 
2 55 . «' 55 » 854 
90*0 DATA 0,1.1. 

.63.253,25S,i53. 

124 . 156 .126, 12 7.. 1 
90S& DATA 0,0,64. 

26,33.34.35, 84 P 24 , 

12ft - 198. 137 . I S9 14 
24. 10ft.65.10ft■10ft, 

9093 ACT URN 


EL A5CENSOR 


l l NAVES FUENTES 


Spectrum |6 K 


Premiado con 15.000 Ptas. 


No penseis que con este programs vamos 0 convertirnos 
en aseensoristas por un dia, fo que pretende el juego, 
por el contrario, es utilizer este medio para 
enriquecemos sabrosamente. 


Vali^ndonos de un asccnsor cn 
constiintc movimicnlo. tendremos que 
deslizamos en cuda uno dc los pisos 
por los que pasa y airapar una scric dc 
bo Isas I tonus de dincro que iran a pare- 
ciendo alcaioriamente. Cuanlas mas 
consigns y cn ci menor liempo posihlc. 
mayor sera tu riqueza y menor el riesgo 


ya que si te descuidas, cn uno dc csos 
descensos pucdcs caer irremisiblc- 
mente al vac to (o sea, al hucco del as- 
censor) con la consiguicntc «castana» 
que acabara con tu vida. 

iUn juego ftcil cn su manejo pero... 
hilly arriesgado! 
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PROGRAMAS DE LECTORES 


nj . 1» 

I 3 OflTfl 166363,1* 

30 

15 OATS .ft . H , 1* . 7 _ 3,6 . J1 
It ORT* C ■ ft* - i*fl . 17» AUC.21&-9 

ft »S 

7 DATa M *0r1*0 1*4 6*.60,30 

lft DfiTa a®- 10ft, 19ft 30. USpAO, 1 
ft*,aa* 

40 LET p 30 LET r=0 UC T !-*5 

oo s-ue 3000 

50 pop _.■£ to 2i a _ 

—SS- pp ifal-S T — 

fc l< , ■“ W “ “ P WWW* 

ftO WtiT 
PHI 


70 rOR 1=0 ro IS 5TCP 2 PttNT 

ax 1,0. IS -'AT 11-1,0, * hEVT i 

7| FOE t *3 TO IS S+EP £ PAINT 
aT 4 31. S ' , AT Ml 3 1 & Nt*T 

7ft LET 4il@ LET w«l 
SO LftT Kfl? LET <*13 LET v ift 
, LET b-ft LET u=* lE t .J - 1 1 LE 
T i *ie let o rj{ 

90 LET ■■INT lR»*D«lfti*l 

91 IF iBt? OP B.E10 OP *^13 OR ■ 
*16 THEM SO TO 92 

92 GO TO 00 

93 LET n>JMT (RwC#31**1 

■94 IF n*| OR f) =S OR OP f = 

22 OP n« 2 J Oft ni^ THEN <30 to IP 
0 


ill to IS. 


T I .ft. 
lie pb 


m 


MK ft . ST ■ - 1 , n r 


V . I . ' “ 
brfi . “™ 

nekt i 1 


INK ft . AT q * ,, 

ij0 RftIMT iNt 4, AT X y ™ 

130 print Inf S.At c-v. — 

1*0 PPTMT IMk ?.RT 

lft0 PRINT 1UK 2,flT 

160 FOR f *I TO 15 
170 PRINT RT <,v 
160 PGIrjiT AT c P y . ■ 

190 PRINT RT vi." 

200 Ft INT AT t .( 

204 LET r # r * 1 

£06 IF r ■ 1000 THEN GO TO 2000 
207 PRINT AT 0 2ft T 
210 LET ^*>-1 LET :=t*i LftT v 
■ ^ - 1 LET bib»l 

230 IF * ift ANl> q ii ThE^J LET p zp 
*100 fttex .01 1 PEEP ,03 5 SO 

iUF TO0O GO TO P50O 
300 IF *-i THEM LET ». >20 
l ie IF I>fl then let to *20 


?ae i* <>2i then let e>j 
330 IF bc21 THEN LET 6*2 
>40 IF INT-E ■ | e"J ' AND ■ 1 THEN 

PRINT AT a , v ■ LET i|= 1 i_t 

T .o= w -k PRINT INF 6 AT ^ n- . 4 1 
PEEP hO^-1 

3*5 3F INhf.fa S PNO *30 THEN 
PRINT AT Til*. ■ LET 4*> f L 
ET PC-IllT INH ft, AT q , to d 1 

BEEP .07,1 

360 I F w l 1 Then LET m = 1 
370 IF *-30 THEM LET *00 

390 IF q *• AND *-v THEN GO TO S 
OO 

391 IF 9** ANp W 9 + 1 THEN SO TO 

■300 

39 S IF **4 DR v >5 THEN Gt- TO 50 

0 

*00 IF <i-c-£ AMD to&u THEM GO TO 
ft50 

*01 IF q*C-2 AMD * *U +1 TmEn GO 
T 0 550 

405 TF u . 11 OR w*ia THEM SO TO 
500 

*10 fF q^w FIND v<i THEN GO TO ft 
00 

4 11 IF *>v AND ->i*1 THEN GO TO 
000 

4 15 IF to > IS Oft *>19 THEM GO T0 
500 

4£0 IF Vb-£ AND Mac- THEN GO TO 
*50 

42i if and to *o*i them go 

TO 850 

*25 IF to *25 Oe - *26 THEM GO -£■ 
500 

*30 IF Me OR q a ft OR 1*8 O-ft 9*1 

1 DP MU OP 9*1’ THEN SC Tt 5 10 

44 ft IF M? OP q*ft OR 9=9 OP W 

2 Op qn 15 OR q*15 Then print *t 

i to LET a*4«l PPJMT AT 1,w 

■i* GO TO 11? 

4^0 GO TO 115 

510 PRINT INF ft.AT q • d * 

520 PEEF .03 12 

5 PR 1 NT at 9 « 

5*0 let 9*o*l 

544 IF qwsi THEM so to 54e 
5*5 GO TO 510 

5*6 FOR Ml T > 2 FOR ; eft TO ’ 

PRINT INt ; AT q.to it tfER .01 

AND* ft *12 ftEEP *01.RNE4b-l£ PA 
USE ft 

54“ riE*T c lE'T fr 
650 PRINT A" 9.to, H LET 

1 PRINT nT h 1. T ‘ AT * , IV 

if the r» g: sge >000 So 

TO 2000 

560 GO 3000 so -: TO 


ftft0 IF tM f h gg TO 510 

510 LftT 3 = 4 -: PfrlKT AT q «, 

INt fATq.Ni it 00 TO 115 
=50 PRINT AT q • LET q>|*l 

PRINT iNr ". hT 4 It SO TO 1 
15 

2000 8EEP . 3„t- BEEP *1.7 *EEt 
.17 BEER .1,7 BEEP .1.9 fiEEP 
,2.7 BEEP r Q^r\2 
2050 FOR V■15 TO «lft STEP ^1 EC 
EP ,01 -V MftKT to 

2100 CLS PAINT AT 7 12, SC ACA 

&£> .AT 9,15 ' ftU" . AT 11 . IS "PUMTU 

AC ION ".AT 13 14.P 

2150 PAINT FlA5h i . AT 19.0, OTFfl 
PART IDA ^ I" f AT 210 FIN JLE 

aeee ip im*ev**'i tneu rum 

*30ffl I r inKC THEM STOP 

tiesi go T o ^ee 

2^0® PRIMT ftT . -1,0 ".AY B.fi 

■ ■• so to ee 

^eee paint at e.e pu^cis - at 
e.ie. uioos i ot a, a, - temp 
*■. r RET u PM 

;^ae ct.s ink 7 

4see print flash 


1 AT il.e. 
PAUSE S CLS 


POLS 

SO 


r SCf-JP . ►'Hlf ■ff fit 

4100 LET 1=1 
R ES L»i OUEC0- 
4110 L?T *.5 

to oe jooar-' 


E ONfi T£ClR 
TO *10(1 

*iSO FOP f*l TO LEM S« PRINT RT 
■ *nt iSo-len o* be 

ep .flo.BNt+ae next t return 

LET * t «'EL A&CCUSO 
■ CO SOB 40S0 
LET 4 t a' HUY SENCJL 
CO SUE 4050 LET ' 
*0 LET »t*‘-£ONEI£TE EN IP C3&1E 
NOO' SO *UIJ 4050 LET ( ,4 LET 
It. LAS BOLSRS CUE SALEH SO Su 
B *050 LET l.s let at. BLEATGF 
rAHCMTE EN LOS PISOS" CO SUB 40 
SO 

4 1,-0 LET tie let at. PEBO TEN IE 
NOD EN CUE NT A" GO SUB 405C LET 
;i7 LET Hi DUE SI TE CAES POP 

el Nueco co sue 4oso Ltf *e 

^ET ♦ta‘ , :-EL BSCEMSOR PERC-ERAS 
UNA UICP SC SUB 4050 
4 130 LET t ■ 10 LET at. TfiMBIEtl T 
ENOPAS EN CONTRA 00 SUB 4050 
LET k.H let at*"EL TSEMPO ^A O 

UE CUANCO LLECUE CO SUB 4050 
4140 LET L.l± LET at.'A HlL't.0 
OOtJE hOECP fl.;flBA0O" SO sue 405 
0 let 1.13 let at- TODD. CD 
sue *050 

4 ISC PC INT FLASH l.AT 31 0 PULI 
A UNA TECJ_A" CAUSE 0 RITuPN 



JORGE JUAN. 116 - 28028 MADRID 
TEL (01) 274 53 80 


MICROUD GREGORIO FDE2, 6 TEL: (983) 35 26 27 
VALLADOLID. 

IBITEC ARAGON. 76. TEL.: (971) 30 32 38 IBIZA. 
BYTE PLAZA DEL PADRE DAMIAN. 2. 

TEL.: (967) 23 78 55. ALBACETE. 


SPECTRUM 48 K + CiNTAS 23-900 

SPECTRUM PLUS + CINTAS 29.800 

JOYSTICK QUICK SHOT If 2.995 

INTERFACE T. KEMPSTON 2.325 

JOYSTICK QUICK SHOT I 1.995 

JMPRESORA GP-50S 19.900 


AMSTRAD CPC-464 + 6 CINTAS 56.800 

TECLADO DK'TRONIKS + 4 PROG. 8.990 

TECLADO SAGA-1 12.800 

MEGA-SOUND 2.900 

AMPLIACION DE MEMORIA 48 K 6.900 

CINTA C-15 ESPECIAL COM PUT. 85 


i i TOD AS LAS 1MPRES0RAS DEL MERCADO CON UN 20% DE DESCUENTO!! 


HYPERSPORT 

_ 1.975 

DRAGONTORC . 

2.050 

UNDERWULDE 

1.875 

TAPPER 

1.975 

SKOOL DAZE 

1.975 

Al IFN 8 

1.875 

GREMLINS 

2.100 

GRAND NATIONAL 

_1.795 

TORNADLO L LEVEL- 

1.595 

ROCKY__ 

1.795 

BRUCE LEE 

1.925 

CYCl ONF 

1.595 

SPY HUNTER 

1.975 

BLUE MAX 

1.925 

GHOSTBUSTERS 

1.975 

SHADOWFIRE 

1.975 

BUCKROGERS 

1.825 

DUKES OF HAZARD _ 

1.750 

ABU StMBEL 

1,990 

AIRWOLF 

. 1.695 

KNIGHT LORE 

1.875 


SI DESEAS RECIBIR TU PEDIDO CONTA-REEMBOLSO SIN NINGUN GASTO DE ENVIO. LLAMA 
ALTEL : (91) 274 53 80 0 ESCRIBE A JORGE JUAN, 116- 28028-MADRID Y RECIBIRAS TU PEDI¬ 
DO EN 48 HORAS. 
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LANZADERJ 

l Antonio RODRIGUEZ 


Con virtd monos ahora 
en pibtos de una base 
espacial terrestre 
establecida en un 
plcmeta lejano y 
hemos de enfrentarnos 
a un grave problema: 
fa escasez de 
suministros. 

Sabcmos gue hi forma mas lacil de 
obicner oxigcno y uranio csarrcbulun 
dosetos a los enemigos, cuya base sc 
cncuenlra prdxima a la nuesira; pero 
no es lan lacil como pensamos, ya gue 
dispone de u na red de sal Elites movien - 
dose continuamentc por el espacio y 
son ca paces de desiniircualquicr nave 
gue micnte infiltrarseen susdominios. 

La misi6n sera plies, evitar las minas, 
haeerse eon las cajas de provisiones y 
volvcr sin dano a la base, teniendo en 
cuenia gue con lor me se van superando 
las dificultades, van aparecicndo pan- 
tallas de mayor complication. 

N0TA5 e»Firicn& 


2365*.i 
3 


-.a 

o 


OUtC: 0 InVEPSC 0 


BORf'C* 1 


1 POKE 
5 CLCUP 
10 LET r.» 

5P EKICNT 
FLA 5 M O 

40 GO 3UD Seofi 
50 GO £U 6 2 O 0 C 
90 PAPER ? IMF 

cEt * .0 let i■ $ 

lie LET .mi; , „ 

£®0 LET t|i ■ fjM a 143 Jji 1 _ 

^|t jj < a^j^fcO O O O 

* 3£ 0 ® o 

223 rofi f*l TO 2 

2-30 POKE ft . INT <AND*29+1* 

£40 POf,E ft * 1 ■ INT IEN&fl3*4- 
£ 50 POKE ft * 2.1NT I PHD*3-11 
£60 POKE 4*^ INT («NDl-3-U 
£70 IF MOT PEEK t**3> PND NOT P 
EEh (fetBl THEH GO TO 2E0 
£80 POKE ft +4 INT jPMt-i 3+23 + 128 l 
fRND > . 5 i 

£90 POKE 149,919 
200 LET a =4+3 
303 NEXT i 

3i® PAI NT AT 0,0- PAPER 6,“PUNT 

” i^^UISOUaUhJSi 

ilff PtftHT IMMERSE I - AT 0 , 6 . ft , AT 
O. IT. £*. AT 0 , 2 ?.;hi 
320 PRINT AT £0-0- INK 2,#Sl2» 

ft t * 3 f 

330 LET :«: *13 lEt V i=£ 

3*0 LET " LET fl pO 

330 PRINT AT 1.6. INK 2. I ft 

400 LET Kl«X LET yl-y 

*1® LET X = - * i iNKEVf ^ P 1 - HPJP EV 


LET y P‘,1 + I. IN«tV*- ,r R" 3 - £ IN 
I 

K ■ * - i* l 

c iMt f i * iy * rx -191 *2# (9 * 

.<*1 TO < +£■ 

IS p)iD V i 1 W I - I ^ * lU «21 OR i. 
PRlNT^AT^l ,X1; ' 1 1 . AT ¥ I*1 

If fL*1 THEN PRINT AT ylil. 
PRINT HT ftT y 41 > 

if rui Them paint ht 9+2. 

iNr 2 ( bf 
475 LET 3LOOP 

4 75 IF flTTP ij.xMiS? OR RTTR < 
ytl.tM:S7 OR ATTA 19 *<+15 057 0 
R HTTP iv+1 * +11 * j 5? TH^M GO TO 
1090 

4SC IF «L=0 AHC c* !<■ C OR < 
i I !>»"(} Then EEEF -SL0 BEER 
.14 LET eiatl LET fl«l i*ET | 
l 16 * 1 TO < +£ a = " 

490 IF fimO OR V 4 THEM SO TO 
30® LET f |*0 PRINT AT * , . 

5Q3 BEEP .014 3EEP + I,0 EEER 
414 

31® LET t|iU^bt PRINT AT l,ft, 
INF 2; tft 

E IE LET ft it+30*30#ib»■ 1 - B * 
PRINT AT 0,5, IHVEP5E I- ft 
52® IF LET- T1 l20 THEN GO TO 4 ®0 
3£3 FOP f il TO 3 F'®R TO + 

BEEF .03,9 MEKT 9 MExT f 
lCT $=**£00 
5£7 LIT £■I^1 
33® GO TO £0® 

1000 LET £f-I*L£ TO ' PRINT AT 
3 . IT. IflUERit l.Zt INI- 6 ," M 
1003 FOR f*-30 T0 -10 3TER £ FO 
R 9 a® TO 3 BEEP .07 94 * NE^t 9 
NEFT f 

1010 3EEP *l r 3® SEEP .1,30 EEC 

P .1.39 

1030 IF THEM SO TO ££l 

104O BEEP l,3fi SKR l, 2 i BEEP 
1-20 

1030 IF i>hi Then lET hs*i PRIM 
T AT 047, FLH$H Lhi 
10EO PRINT AT 10.S;-NAMES ASOTfl 
DAS ' 

10?® FOE F *1 TO SO® 

TO 30 

£000 BOEDER 7 PAPER 

PRINT TAB ft.'! 
tab a. INK 

yii«" 

2O£0 PRINT 1 "TU BASE ESPACIAL PF 
EC ISA OXISCHOi EMEPOIA V SOLO PU 
EOE OBTCNEPLAOUITANPOLE LA SUVA 
AL eNEHlCO* 

£030 PRINT TU NISIOM SERA EUITA 
A LAS NINAS-SATELITE DEL ENENIGO 
-AOSAALE LASCAJRS V MOLMEW A Tu 
OASE, 

£®4® PRINT '"LANSAOERA HINAS 
MRAM1D r OX 10, 11 _ 

204S PAINT AT 13.3. IMr. 1 A 

t ie .3, ‘ X * 

2030 PRINT i 


NEXT F GO 

INK 0 C 


o n - 1 ? 


AT 16 11. 
£033 PRINT 


“8t 


.At 17.1 a 1 'N _ 

13 19. INK. O 


' THEN GO TO £03 


■0 fop 
f.ft LET 

NEXT f 

5015 FDR r*71000 to 311?S READ 
<1 POKE f.* LET MIN NEXT f 
3030 PETURN 

7000 DATA 192.224. 11 £.56.23,14 .? 
.2.0.0 0.24.36,112.££4.64 
^010 DATA 30■63 102.10i.102.102, 
63 r 30.120.£52.102.102.10£ 102 25 

l r 12® 

70£® DATA 2 * 7.14,20,24 .0 0.0 64. 
224,112.S3.28.14.7,0 
7®30 DATA 0.0 0 £4 .£0.14 7 £ 3 7 
14,20 .56■ 112.224.64 
704® DATA 30.03,121.121 121.121. 

*3,3® 120 252.15©.13S 15S,15623 

7O30^DATA 2.? 14,28,56,112,224.1 
92,64 224,|12 56. 2* O,®.0 
-050 DATA 135.76 31 r 63.120.112,5 
®.00 £25,50.24©.25£ 30.U.IS,10 

7®7® DATA 112,15®.63 -31-?5>11.60 
,63> 14.3® .£33.246 .Ml 19? .232.33 
2 

708® DATA 63.124,248.249,249.248 

,l£4 £5£.62,31 169 - 154.31.62, 

252 

7090 DATA £3.121,249,249.249.249 
.124 63.252.136.139.139 1*9 5 1.6 
2,232 

7595 DATA 255 170.£55.170,£55 t7 
O .233.17® 

6000 DATA ££ 1 .33.O . J £5 . ££ 1 1if ,O 

.264 253,4®.34,95 221,66.1.6,3.6 
2 , 22 . 2 13,122,213, 123 . 2 13,62. 62 - 2 
13.©2,32,213 

5010 DATA £0.16,24®.221.35.221 r 3 
5,221,33,2£l,35>221.35,24 215,22 
1.33.0,125.221,126,0 234.233.200 
^2|a ^1>4 2.£34,£55,40,4,264.31.5 

solo DATA 126 2,237,68.221,ii9,2 
,££ 1 . L£© . 1 .£54 .£.40,4 £54,17.31 
A 221.126.3,23? ,66,221,119.3 221 
,1£©.®.££ 1 .134,£,££!.119®.££I.3 
26.1,221 

©030 DATA 134.3,2£I,;19 1,14 144 

,221.203.4 1£6 , d.® .. 1® r ££l r £03.4.1 

90.62.6.129,?9,24.4.221 203.4.33 
4 . 3£1 . 12© 

804® DATA 4,£03,191.195,56,50.14 
3.92.221,i6.1.6,3.62.£2.215.122, 
£15,221 i£©.0,215.121 r 213,12.121 

.£15 

6050 DATA 12.20, 1©.236,221 -36 £2 
1.33.221h33>221.35,221,35,193,73 
. 121 


Speitrum H K 
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RIDE ESTOS PBOGRAMAS A ER8E Software. SA 

Y EN LAS MEJOI 


















































■Aulto at castillo- 


F.n e> numerp 5 pagma 9 
en et program# A salto at 
ca&uiQ' cuando hago HUN 
me sale E Out of DATA 
9660 2 ta tinea 9660 es 
FOR tO TO ? READ s PO¬ 
KE USR f- t /, s NEXT f 
tguat que en ia revista. cdon- 
de esta el error 7 

J *im+ At A ft H 

Q La linen 9660 <_'S on la 
que se ha ddectado el 
error pero no quiere decir 
que deba osfaf necesana 
monte on esa (mea F,n usle 
caso el error debe ostar en 
alguna de Ihs Imeas si 
guienteS 96 tO 9630 o 
9670 


Estudiar programaci6n 

Yo quierO hater et ctirso 
de proqramador pero en rr> 
ifds las academics no me 
dan el titulo Stftn un diplo¬ 
ma cMe srrve ef diploma pa 
ra decoder a un puusto de 
Irabato 7 cSerta equrvalente 
a un lihilo de prograrnadot? 

tr*i nrnen J VJIU Tm 

■ Que sep.imos el tilulo 
superior de in for mat tee, so 
to pueden olorq.irlo Iris res- 
pecbvasfacuHades Esio no 
quiere decir que un diploma 
no sirv-i para nada, pero si 
le interesii la In formatter I, le 
accnsejamos que curse la 
carrera en una tacultad de 
informahca 


-Es la guerra* 

En el proqtama del nume- 
ro 12 Esia guerra alllegar 
a la hnea 2260 ya no tibne 
mas capacidad. pues en vvz 
de subir la hnea haem arnba, 
haja hacta aba/o & Como 
puedo qrabarto? 

En esre mismo programs 
surge la palBbr.t POINT 
esla no trqura en el hbrp de 


msirucciones com co ma n - 
do tHay que hacer algo en 
particular? 

A i txm-iH d. J Oflf H t£ C‘Jdi / 

Q El programa que nos in 
dicaespara 16 K, por loque 
dope entrar en cualquier 
Spectrum a menos quo ton¬ 
ga alguna a vena en la me 
moria le aconsoiamos que 
compruebe este extreme 
Teclee 

PRINT PEEK 23732* 
256-PEEK 23733 
La re spue St a debora sor 
32767 si Su ordenador es 
de 16 K y 65535 st es de 46 
K 

POINT noesun comando 
sino una funcion seobliene 
con SfMBOL SHIFT v 8 on 
modo extendi do. so habla 
do oil, i en of capilulo t 7 del 
manual 


Codigo maqurna 

Somos un qrttpo do dn 
cos quo posoemos Spec¬ 
trum y desear t am os saber 
i;na sene de cues it ones, en* 
fre eiias 

Como hslar codtqo ma- 
qmna 

Como utilizer el ordena- 
dor en codigo mAqutna nada 
mas encftutiirlQ, con las me- 
nos sen to no as potables 
Como podnamos hacer 
que ana tinea en Baste se 
on site s in tos comandos de 
color y qvede invisible 

Jew f Vr Mtlf if 

□ Para listfir en codigo mn- 
quma so puedo hacer 
iG FOR n- inicio TO 
iruclO+tongilud 1 
20 PRINT n PEEK n 
30 NEXT n 

Aunqge es mas ul>l listar 
on Assembler para lo cual 
neoesitaras un desensam* 
blador pueden encontrar 
uno on MICROHOBBY CAS 
S6TTE numoro 2 
El ordenador no se puede 
utiii/ar on codigo maquma. 
ya que esio no os un Ion 


guaje de programacion El 
lengua^e correspondienie 
es el Assembler y para 
usarlo en el Spectrum nece- 
sitaran un Ensamblarior 
hay muchos diaponibles 
comercialmente 
No es posibie ocuitar una 
linea en Basic a menos que 
se utihcen comandosde co* 
tor por epempto poner la 
tinta blanca 


Raices cuadradas 


Me gustahasaber quo hay 
quo hacer para consequit 
Una rai/ cuadrada en mi 
Spectrum Plus 

DAetdFONHiH Altc*frt+ 

Q La funcion SQR ique se 
obhene con H on modo 
oxtendfdot sirve para hat far 
raices euadrarias pruobo el 
Siguiefltc program.I 

10 INPUT NUMERO a 
20 LFT b 3QR ABS a 
30 PRINT La rat/ do a 
os b 

40 GO TO 10 


Atnp!iaci6n de memoria 

Me gustana que pubhea- 
sen information sabre la 
ampliaopn de memorra do 
16 H a 48 K interna 

Tambidn me gust ana que 
me dgesen si i.i amphai ton 
de memona externa es com 
patible con otrospenfencos 

J# v i ^j (>A Ytl A P^m i>t 

G En los numoros *> y 6 ife 
nuestra re vista encontrard 
in for mac ton exfen sa sobro 
la ampliation do memona 
interna 

La ampliacron do memo 
na externa es perfeciamen 
te compatible con torios los 
penlericos 

Tramp a anti-pirates. 

cComo puedo hacer para 
que en caso de error de car 


eja de un programe no saiga 
el ttimoso Tape loading 
error- smoQueseptodutca 
un RESET? 

Jp«* * Cjdu 

D La que usled propone es 
una de tea trampas anti-pi 
ratas mas basreas de los 
programas comercialos 
Para consegufrlo debera 
car gar delanie de sus pro- 
gramas un pequeno pro- 
grama-trampa * como el que 
sigue 

10 LET error-PEEK 
236I3 + 2S6-PEEK 2361 J 
20 POKE error O POKE 
error* 1.0 
30 LOAD - 

Este progfama-lrampa 
debera satvarlo con LINE 
lO para que se auto-ofe- 
cutc 


Movimiento alealorio 


Me qusi art a saber como 
sepuede hacer que ungrdh 
co se mtteva por la pant alia 
mdependientemenic del 
resto del program.* 

ibf I HAWAfi 

. J Puede uliltzar dos varui 
bios como coordenadas 
para esc* grafico y alterar su 
valor do lorma aleaiona 
Vca el siguienieejempio pa 
ra un astensco 

10 randomize 

20 LET li 11 LFT cO- 15 
30LET lia h LET con co 
40 LET a 1 t INI |RN0-2| 
50 LET b 1*INnRND*2l 
60 LET I1-I1+ |a- 1 AND 
Ii 211 in 2 AND h Ol 
70 Lt 1 co=co+lb -1 ANO 
co 311 - (b ? AND co 0» 
80 PRINT AT li.co * AT 

lia.COa 

90 GO TO 30 


Varios 


cPodna permanecer el 
Spectrum Plus encendido 
durante todo el dia? 


32 MICROHOBBY 






















cOue pasana si se conec 
tasen tos pentencos una vei 
encendido el ordertador? 

ePodrta aiimentarse el or- 
denador con ana bated# de 
I2v sm danar a cste? 

cPara q ue sieve osia 
hnoa? 9999 SAVE mom 
bre)* LINE tx) con la end ft 
naft/an alqunos de sus pro 
dramas 

4tf>W0 G QMlMf ./ Aimfn# 

PI E.n principle no haylimi 
te para cl tiompo que puede 
permaneer cl Spectrum co- 
neci ado 

Los ptntoncos deben co 
nectarse y desoonoctars*. 1 
siempre con el ordenador 
desconeclado. ya quo de lo 
contmrio, esfe se destruina 
con loda seguridad 
Si dose a ah men tar el or- 
denarior a parhr de 1 2v de 
horn intfvealar un circuiln 
quo rabaje fa tension a 9v 
de Jo contrario. podria cau 
sar dan os a su ordenador 
La tinea quo nos mdica, 
sirve para gu ardor id pro- 
grama en onta con nuto- 
ejecucion 


AtttO-flf 

Poseo el interface defoys 
lick progt a triable de INDES- 
COMP y ei loystick QUlCh 
SHOT //con an to dire pero 
no se como ptoqtamar et 
auto-tire tdi$paro perma 
nentei. tpOdnan mdiCar me 
la manor a ~> 

OrrjP frOtNftrfCI 0#rcW4fol 

□ El auio hre os. simple* 
menle. un inter ruptor colo 
cado en paralelo con el ho 
ton rledispnro. porloquees 
suficienio con accionar cste 
botOfl 


AiwplHitnlor do tonldo 

cComo ptiedo amphUcar 
el sonido de mis Spectrum 
sin trastear por denuo 7 

J V lAVAHi/ Auction* 


El Puede conectar la salidn 
MIC - de su Spectrum a fa 
entrada de microfono de 
Customer ampldicador do 
mostico, o si to prefiere ad- 
ciurrir un amptdicador de 
sonido especdicamenie di 
senado para conectar a so 
ordenador 


Ve loci dad de ejecuciOn 

t.Qup qutere dear quo ei 
Basic es un lenguaie nrny 
lento ? 

AnrflftAD &RJHVQ 

0 Lina misma tarea se read 
/a con mayor q menor rapi 
de/ segun cl lenguajo en 
duo so hava progrartiado. el 
Codigo maquma es ef Ion- 
guaje de ejccucion mas ra 
pida r mientras quo el Basic 
es uno de tos que se ejecu- 
tan con mas lentitud 
La ra/on es quo <il ser un 
lenguaje interpret, too mo 
comp if ado I el ml or prate he 
no quo traduce cada sen 
lent iii del progiama cada 
vvf fiue Vi i a ei ocular fa 


Cassettes y joysticks 

Tengo un cassette giro so 
to tiene entrada dv auricula 
res. epuedo qrabat en cstas 
condioones?. cc omo 1 

Me qustarra saber si tos 
numdos tie un video-jtiogo 
A TAPI valen para el otdena- 
dor 

OtcJfCiAAOA Ujtfntf 

□ Si su cassette no bene 
entrada de mieroionu os 
imposible que pueda gra 
bar a monos quo se la msta 
If no obstante, compruebe 
si no se Irata de un Walk 
man ya que eslos no puo 
den g radar 

Los joysticks de ATARI 
son perfectamenie compa 
tihles con cualquier inter fa 
ce de joy slicks para et 
Spectrum 


Nombrcs de variables 

En un Cursitlo de informa 
tics quo os toy haoendo nos 
han dtcho Que. en los orde- 
nadores que utihzamos en 
las prdciieas las variables 
pueden inner et numero de 
caracteres que sedesee pc- 
ro et ordenador solo recono 
c era tos dos primer os 

cCuantos caracteres ad- 
nuie el zx Spectrum como 
nombre de variable y cuan 
tos reconoce 7 

Ju*nGAruBQ 

□ En et Spectrum puede 
ulili/ar el numero de carac- 
tores que desee y et ordena- 
rior los reconocera a lodos 
Por ejemplo. para ei orde- 
nador son d^stintas las dos 
variables siguientes voria 
blel y variable? , pero sin 
embargo, variable y VA 
RlABLfL son la misma 


Pseudonemonrcos 

He empeiadc hace dos 
meses a esiudiat et codtgc 
maqiiinaymehe CdCOntradO 
vanas veces c on el probte 
ma de vet un nemdmeo sm 
su ccrrespondiente codtgo 
de operaciQn Tat es el Caso 
por c/emplo. en el numero 
11 paqma 3 1 cn el ptoqta 
ma Assembler cuartdo en- 
centre en la tinea ?T0. DEfB 
5 NUMBER TOO Bid 
cComo se introduce du:t>a 
tineaccual es et codigo dc 
QEfB> 

Por olrapativ hevr&loque 
para introduce y poder #]€ 
cuiar es la rulma se necesita 
RANDOMIZE USR 60000 
REM SAVE 2500 DEMO 
cPara Que sirve la segunda 
parte de la tinea? 

tun ¥ Pin* ¥.,n„0 

0 La palabra OEFB es una 
mstrucciOn de Assembler 
que no se ensamhla en co 
digo rnaquma su significa- 
does Oelmir un Byte Tie 
no el cfecto de almacenar 


en ta diroccion correspon- 
diente el numero que k? si- 
gue 

Esietipodemstrucciones 
iDEES, DEFW EQU IF EL¬ 
SE, etc i son propiasdel on- 
samblador con el que se 
trabaje. se denomman 
paeudonemonicos y no 
tienen traduccion a codigo 
maquma. su misionescon- 
trolar cierlas functones del 
emsrimblador 
En la hnea que nos co- 
menla, la primera parte sirve 
para entrar en La ruhna y la 
segunda, salvael program,! 
DEMO a2500baudios El 
comando REM hone la mi- 
ston de svtlar fiuel inlerpre 
le de Basic detcctc error de 
sinlaKis 


Primos, pero no 
hennanos 


El SpectrumZX yet Amsttad 
CPC -J6-1 Uenen et rmsmo nx 
Croprocesador. el Z BOA 
cEsto en quo tos hacesemc 
tantcs? Sr bten me imagine 
r me un proqrama esentopa 
ra uno no firncfones en otro. 
i s erta mtty dtfiat vat tar un 
hstado para que tuncione 
c:on el Otro ordvnador? En 
detmtuva cquo pueden te¬ 
nor en comun ordenadores 
distmtos con mrcroptocesa- 
dotes iquates ^ 

fWWWtfo 


Q La umca simihtud enlrc 
dos ordenadores con cl 
rnismo micrqproccsadof es 
queambos uldizan el mismo 
Assembler no obstante la 
incompatibihdad de softwa¬ 
re eS a b SO fu I a inCluSO para 
programas esentos on co- 
rtigo inaquma 
Dado quo los sistemas 
operatives y los dialcdos 
de Sasic son totalmentc di 
ferentes la adaptadbiT de 
programas de un Speclrum 
para un Amshad puede re- 
Suttar tan ardua como para 
cualquier otro ordenador 
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r—pEOCASKM 


• VENDO Spectrum 4B K en 
buen esiado, manuals, todos 
tos cables. Precio 40.000 ptas, 
Tambien lo cambtaria porCom¬ 
modore 64 interesados escribe 
a Anionio Marques. Principe de 
Vergara, 133, 4 r> A. Madrid 02. 
T«L 4117260. 

• ME GUST ARIA ponerme en 
contacts con lectores de cuat- 
quier tugar para intercambiar 
ideas, truces y que me puedan 
ayudar a imciarme on cl codigo 
me quin a, yo puedo ayudartes 
con mis conoctmientos en elec¬ 
tronics Interesados escribir a 
Jose A. Lope; Pardo. Vila nova, 3. 
S Pedro de Nos (LA CORUNA) 

• VENDO Spectrum Plus, aun 
con garaniia, poco usado 30 re¬ 
vises y iibros t6cnicos Basic, 
con la cmta de demostracibn y 
lodes los accesorios origin ales. 
Precio: 35.000 plas. Interesados 
I la mar al Tel. {957)295408 {3 de 
la larde), 

• VENDO ZX Spectrum Plus, 
con cables, cassette de demos- 
iraobn, manual, fuenie de ali- 
meniaciOn. con garaniia y en 
pedeclo esiado Precio; 35.000 
plas, Interesados Hamer el Tel 
1976)33450 (a pariir de las 8 a la 
1). 

• VENDO ZX Speclrum 46 K 
Muy buen esiado, garantia In 
vestrdmca, libro para apron dor 
cbdigo maqume para el Spec¬ 
trum, Precio: Z5000 plas Tam 
bien vendo impresora Seikosba 
GP-50S. toialmente nueva. ca- 
pacidad dealtaresoluckin, total- 
mertle adaptable ytiecha para el 
Speclrum, Precio: 20000 pias. 


Ademas, vendo Light Pen de 
DK’Tromcs junto con so cassette 
e msirucciones por el precio de 
5.000 plas. Fmalmente vendo 
TRS-80 (mod. II), en buen esiado 
, ideal para aprender Basic, se 
compone de umdad central, 
monitor y allmentacion (cassette 
optional) solo por el precio de 
15.000 plas. Interesados ftamar 
al Tel. (93)2396293 pregunlar 
por Albert. 

• COM PRO impresora Seikos- 
ha GP-100 o similar, siempre 
q ue el papei sea de tama fio (olio, 
asi compraria tambien el interfa¬ 
ce Cen ironies que necesifase 
para so uiilizacton. Interesados 
contactor a I Tel. (963)239691. 
Pedro. 

• ME GUST ARIA conta c tar con 
usuarios del Spectrum, para es- 
to verano, con ei fin de intercam* 
ijijr toda clase de ideas, Irucos. 
elc Coniactar al Tei 
(93)3372915. pregunlar por Mi¬ 
guel. 

• VENDO joystick e interface 
programahie. Precio a disculir, 
Llamar al Tei. 7334947 de Ma¬ 
drid. Raul. 

• VENDO ZX Speclrum an per- 
fecto esiado. en garaniia hasta el 
14-11-65, con salida para moni¬ 
tor, mcluyendo cables, manua¬ 
ls en Castellano, interface y 
joystick Kempston y un libro de 
programacton Basic por sOto 
39.000 pies. Tel 4566352 de 
Madrid, pregunlar por Jose Luis. 
» VENDO ZX Speclrum 48 K. 
nuevo con garaniia por el precio 
de 29.000 plas. y tambien ZX 
Spectrum Plus 48 Kooref precio 


de 40.000 plas. Interesados lla¬ 
ma r el Tei. (93)7512837. 

• VENDO ZX 61. con amplia- 
ciOn de 16 K, manual de ms true* 
ciones inglte y caslellano, ca¬ 
bles, fuente de alimentation. por 
el precio de 15.000 pta$. Com- 
prado el 9-11 -84. Llamar a parlir 
de las 6 de la tarde ai Tel. 
(93)3336459, preguntar por Ma- 
nbel. 

• VENDO Speclrum Plus, con 
libro y cm la do demosiracidn 
con interlace program able, joys 
tick, amplrficador de sonido. Sin 
ulilizar y con garaniia sin sellar. 
Comprado en enero, Precio: 
50.000 plas. intemsados uamar 
at Tel. 4310917 de Barcelona y 
preguntar por Miguel Lucas 

• VENDO interface programa- 
ble de la casa Indescomp, con 
msirucciones en casteilanp, pro- 
do: 4 200 ptas. mieresados es¬ 
cribir a: Daniel Bassas Pablo. 
Marques de Camps. 16. 3, a 2_\ 
Gerona 17001. 

• VENDO Joystick e Interface 
programable, precio a convenm 
Contactar con Guillermo Her 
rrendo, llamando al Tel. 228535 
de Logrofio (nochest. 

• COM PRO msirucciones de 
programasen Castellano Vendo 
libro ..program acid n avan/a da 
Spectra video- de indescomp. 
Llamar al Tel 520317 de Valla¬ 
dolid. Pregunlar por Oscar 
Martin. 

• VENDO iibros «Juego$ para 
ordenador® y -Basic B6sico* In- 
leresados escribir a Ruben Solo 
de Roa. Teruei, 4, Tudela de 
Duero (VALLADOLID) Tel. 


(963)521380. 

• VENDO ZX Spectrum 16 K. 
tele vision b/n. Precio: 25.000 
plas El ordenador procede de 
un concur so y esia sin estrenar 
Com pro ado mas iibros o revts- 
las sob reel ZX Spectrum Llamar 
at Tei (976)348359. Fernando 

• VENDO 0 CAMBIO por Spec¬ 
lrum Plus con cintas, un organo 
-Studio M81- por el precio de 
72.000 plas. Inleresados dlngrr- 
se a Francisco Sanchez Medina. 
Aibaiana. bi. 42,1449. U,VA de 
Hortale;a (MADRID) 33 

• VENDO ordenad or ZX Spec¬ 
trum 48 K. con los manuaies en 
casleliano , adaplador, tod os Ids 
cables, cmta -Honzonles*, lodo 
por 26.000 plas. IntereSadOS es¬ 
cribir cuanto antes a Jesus Ma- 
nuer Sesar Caja raviUe. Fuenie 
del Qro, 22. bajo. Santiago de 
Compostela. (LA CORUInIA), 

• VENDO video-juegos, Phi¬ 
lips G -7000 por ei precio de 
13 000 plas. y reyaio 3 cartu- 
cbos de varies juegos. Coniactar 
con jose Mguel, llamando at 
Tel, (9761413884 

• VENDO video-juegos Tv 
Sport, con seis juegos, semin ue- 
vo. su precio airodedor de 3.500 
plas , strve lanio para b/n como 
para color.Tambien vendo Sca¬ 
le* me, con mds de 25 iramos de 
pisla, mandos, translormador y 
un coche, su precio apron, de 
4,500 plas. Escribir a Francisco 
J, Richarie. Carolina Alvarez. 18- 
22 Valencia. 

• VENDO Spectrum 48 K, 
com prado Pace menos de un 
aho, con la garaniia sin fee bar, 
con 2 hbros ■'Programadot de 
Spectrum*- y -Aprendiendo Co- 
digd Maguma-, diversas revis- 
tas. manuaies y cables en per 
fecto esiado., irjyslck lipo 
Kempsion con interlace. Todo 
por 35 000 plas discuiibles In¬ 
leresados escribir a J. Luis 
Martin sae*. S. Pedro *m, EdL 
Bemmar 2 Torre de la Horadeda 
(ALICANTE), mdicandoel nume- 
ro de teieiono, 

• CAMBIO orgamllo Pi4, con 
mstruccmes y 4 meses de ga- 
ranilia por Interlace Kempsion y 
Joystick Quick Shot l 6 2d bien 
por ei precio de 5 000 plas. Los 
interesados llamar ,il Tel. 
[9731246138 

• VENDO impresora Seikosha 
GP-50A (paraiefo). prdclieamen- 
ie nueva, con garanti y furcio- 
nando perfectamente, en 
20.000 plas. Regale cmta, entm- 
lador de repuesto y dos roll os de 
pa pel. Tambi4n cambiaria por 
Iniedace 1 o Microdrrve. Ofertas 
al Tel. (983)770424. Preguntai 
por Jos4 

• vendo video-juegos Alan 
2600 con la console y dos joys¬ 
ticks Precio: 10.000 ptas. Intere¬ 
sados uama r a Jose J avier al Tel. 
(945)263786 




/NOS VAMOS 

la A _T OE 

yVACACIONES! 



Como habiamos 
anunciado en el 
editorial denuestro 
numero uno, Ml- 
CROHOBBY saleal 
quiosco cada se- 
mana, 50 veces al 
ano. Durante el mes de agosto. pasaremosa perio- 
dicidad quincenal. puntualmente los dias 6 y 20 de 
dicho mes, A primerosde septiembre. recuperare- 
mos nuestra ya cldsica saltda semanal. iOue os lo 
pasdis bien! 
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DEUS EX MACMA. ;EL AUDIO-VIDEO! 


Un nuevo ooncepio de fuego por ordenador 
llega de ta mano de Investrbmca. 

Deus ex Machine 

Una histona de Cienaa Ficcion cteada por 
Andrew Stagy, COii mUSicd tie Mel (JfOiiCfier. 

Si6niate ante tu televisor smcronma la 
banda sonora y surri6rgete en un 
espectaculo total 


Ha nactdo el audio video por ordenador 

SPECTRUM. EL MAXIMUN EN SOFTWARE 


m rKSTMUxjo c 

A fciustT' invesironica 
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